


















































































































































































































































THE DK SCREEN-SHOT PROGRAMMING SERIES 

Books One and Two in the DK Screen-Shot Programming Series 
brought to home computer users a new and exciting way of 
learning how to program in BASIC. Following the success of this 
completely new concept in teach-yourself computing, the series 
now carries on to explore the speed and potential of machine-code 
graphics. Fully illustrated in the unique Screen-Shot style, the 
series continues to set new standards in the world of computer 
jooks. 


BOOKS ABOUT THE ZX SPECTRUM+ 

This is Book Three in a series of guides to programming the ZX 

Spectrum+. It contains a complete BASIC-and-machine-code 

graphics language for the Spectrum+, and features its own 

graphics editor which enables you to use all these facilities directly 

rom the keyboard. Together with its companion volumes, it builds 
up into a complete programming and graphics system. 





ALSO AVAILABLE IN THE SERIES 


Step-by-Step Programming for the Commodore 64 
Step-by-Step Programming for the BBC Micro 
Step-by-Step Programming for the Acorn Electron 
Step-by-Step Programming for the Apple Ile 
Step-by-Step Programming for the Apple llc 














PIERS LETCHER 
After graduating with a degree in Computer Systems, Piers 
Letcher has worked in many areas of the computer industry, from 
programming and selling mainframes to designing and marketing 
educational software. He was perilieal> Editor of Personal 
Computer News until May 1984 and has since written a guide to 
peripherals and a number of other books for popular home micros. 
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The Sinclair Spectrum is one of the most popular 
microcomputers ever produced. One reason for its 
success has been its remarkable ability to produce 
graphic displays rivalling those produced by much 
larger computers designed only ten or fifteen years ago. 
However, graphics programming in BASIC under- 
utilizes the Spectrum. To produce the kind of displays 
seen in commercially available games, you need to use 
machine code as well as BASIC. | 


What is machine code? 

The heart of the Spectrum, the Z80 central processor, 
cannot understand BASIC. A BASIC program must 
first be translated into a simpler language that the 
machine can understand (hence the term “machine 


code”). This code is in the form of binary 1s and Os. | 
Before the processor can execute a BASIC program | 


line, all keywords and variables are first converted to 
machine-code instructions. 

BASIC is an example of what is known as an 
“interpreted”, as opposed to a “compiled”, language — 
thatis, it is executed by the central processor line by line 
rather than as a complete program. While an 
interpreted language is easier to use, it is also slower in 
execution. By writing programs in machine code, you 
can miss out the BASIC interpreter altogether. In 
addition, machine code allows you to utilize many 
features of your Spectrum which cannot be reached 
from BASIC, so that you can therefore achieve far more 
impressive results than would ever be possible from the 
simpler, but more restricted, BASIC. You can get an 
idea of how much faster machine code is by seeing the 
time taken for the programs in this book to run. 


Disadvantages of machine code | 
Given all the advantages of machine code in both speed | 
and flexibility, why not ignore BASIC and use machine 
code all the time? The answer is simply convenience. 
Using machine code is time-consuming, difficult and 
frustrating, and attempting to write your own code is 
only for the expert. When you see machine-code listings, 
they are usually in a “disassembled” form, that is, with 
some of the numbers translated into mnemonics such as 
LD for LOAD, and JP for JUMP. But a special 
disassembler program is required simply to give you a 
machine-code listing in this form, and these mnemonics 
are themselves far from simple. Using machine code 
even the simplest operations in BASIC, such as drawing 
a line on thescreen, require many lines of machine code. 
In addition, machine code has no error-trapping | 
routines such as those in BASIC. If a mistake is made 
when keying in a BASIC program, the program willnot | 
be lost (although the program may refuse to RUN at | 





routines, a mistake will probably cause the Spectrum to 
crash, erasing both the program and its DATA. 


The solution 

This book combines the advantages of machine code 
with the convenience and simplicity of BASIC. This is 
done by giving the machine code in the form of ready- 
made and tested routines, which you can then use in 
your BASIC programs. The machine code is shown as 
DATA statements in BASIC, which means it isn’t 
necessary for you to understand anything about 
machine code to be able to use the routines. The DATA 
is given in the form of decimal numbers, rather than in 
binary or hexadecimal (to base 16), so that the machine 
code is in the form most convenient for you to read and 
key in. 








The machine-code routines 
Here is an example of a machine code routine (the 
point-plot routine, FNf, from page 17): 








7350 LET b=6150@: LET l=60: LET 
Z=8: RESTORE 7360 

7351 FOR i=8 TO l-1: READ a 
7352 POKE (b+id,4a: LET z=z+a 
2353 NEXT i 

7354 LET zeINT (IZ/U -INT (270) 
Dat 

7355 READ a: IF a¢>z THEN PRINT) 
SFF: STOP. 

7360 DATA 42,11,92,1,4 

7361 DATA 0,9,86,14,3 

7362 DATA 3,94,62,175,147 

7363 DATA 216,95,167,351,55 

7364 DATA 31,167,51,171,230 
7365 DATA 246,171,103,122,7 
7366 DATA 7,7,171,230,199 

7367 DATA 171,7,7,111,122 

7368 DATA 230,7,71,4,62 

7369 DATA 254,15,16,253,6 

2370 DATA 285;166,71,156,176 
7371 DATA 119,201,0,06,2 

7372 DATA 24,0,8,0,0 











Each routine in the book is shown like this, in the 
form of a BASIC program. The machine code is 
contained as a series of DATA statements in lines 7360- 
7372. At the beginning of the routine in lines 7350- 
7355, there are a few lines of BASIC. This is a loader 
program; variable b tells the computer where in mem- 
ory to begin loading the routine, and variable | the num- 
ber of bytes in the routine. When the loader routine is 
RUN, this routine is placed in memory from address 
61500 onwards, and has a length of 60 bytes. 

As shown here, of course, the routine is simply a list of 
numbers, and has no visible meaning. These numbers 
are the ready tested and assembled machine code which 
has then been converted to a sequence of decimal 
numbers. Each number corresponds to a single 
instruction or item of DATA required by the routine; 








E) 


hence, all the numbers have values between 0 and 255, 
the maximum value of a byte. All you need to know 
about the routine is what it does and what information it 
requires so that you can call it correctly from your 
BASIC program. 

All the routines in the book are defined as functions. 
Each function is individually coded by the letters a tot; a 
complete list of functions is given on pages 60-61. 
Demonstration BASIC programs can be found on the 
same page as the routine, which give an indication of the 
kind of displays possible using the machine code. 


How to use the routines 

To use any program in this book, simply key in a 
machine-code routine together with a BASIC program 
which demonstrates its use. You will find full details of 
how to do this on pages 8-9. When you RUN the 
program, you will immediately begin to see the true 
power of your Spectrum. 

As you progress through the book and the range of 
routines grows, the BASIC programs grow too by 
calling several routines to produce increasingly complex 
graphics. By keying in each routine just once, and then 
SAVEing it onto cassette or Microdrive, you will have a 
sophisticated graphics capability at your fingertips. 


The programs in use 
Atypical program from this book (the exponent curves 
program on page 17) contains two details which will be 
unfamiliar to BASIC programmers who have not used 
machine code before: 

EXPONENT CURVES PROGRAM 








E PN fogyi sUSR 61500 
$ BEROEN SI7bAPER G: INR 0 
FOR n=1.19 TO 1.60 


FOR x=@ TO 22 STEP @.5 

LET z=INT (Ktn) 

CET 9=INT {%+#8) 

RANDOMIZE EN fizy) 

RANDOMIZE FN f(2$5- 
a 


c 
STEP 9.0 


Bi 
M 2z, 
x 
A 





First, you will see in line 10 a DEF FN statement, which 
is used to instruct the computer that a machine-code 
routine with two parameters (x and y) is located at 
address 61500 in memory. You will also notice two 
RANDOMIZE FN commands (lines 150 and 160). 
These are the calls to the point-plot routine, and the 
numbers in brackets which follow them are the 





parameter values to be passed to the machine-code 
routine (in this case, the co-ordinates of the point to be 
plotted). When RUNning, the program is carried out by 
the computer in this way: 





POINT-PLOT PROGRAM FLOWCHART 














(zy) 





| routine plots point at 
is 
ei 








| routine plots point at 
| (255-z,168-y) 


















On the left side of this diagram is the main BASIC 
program, and on the right you can see the machine-code 
routines, called twice using a RANDOMIZE FN 
statement. You will see from the diagram that the 
machine-code is used here very much as a subroutine 
would be used in BASIC, with variables passed to the 
routines each time they are called. 


What the routines do 

Much of this book gives you machine-code versions of 
the graphics commands you are familiar with in BASIC. 
You will find that the machine code is often many times 
faster, and offers you alternative ways of producing 
graphics which will often be preferable to the BASIC 
method. 

In addition, several routines are included in this book 
which would simply not be possible in Sinclair BASIC, 
such as magnification and reduction, and filling in 
irregular shapes with the current INK colour. 


The graphics editor 

To make the machine-code routines in this book even 
easier to use, all the routines contained on pages 10 to 41 
have been combined in a single program to form a 
complete package of routines, which you can use as a 
graphics editor (pages 42 to 51). No knowledge of 
BASIC is required to use the graphics editor; even 
someone with no knowledge of programming, and who 
has never used a Spectrum before will quickly learn how 
to produce sophisticated displays using this graphics 
editor. 








USING THE MACHINE CODE 








The machine-code routines in this book can easily be 
incorporated into your BASIC programs without you 
having to understand the intricacies of how they work. 
Simply choose a program from this book, and follow the 
four steps given here. 


1: CLEAR memory 
As soon as you switch on the Spectrum, type CLEAR 
55500. This command resets RAMTOP, the top of the 
area in memory free for BASIC programs, and ensures 
that BASIC programs cannot overlap with the machine 
code (stored in memory from 55500 upwards). Now you 
can safely use NEW to delete BASIC programs without 
deleting any of the machine code in memory. 
Remember to use CLEAR before loading machine 
code, since this command erases whatever is in memory 
above the specified address. 


2: Load the machine code 
Now type in whatever machine-code routines are 











Address in memory at which 
routine is located 


Other machine-code routines 

which must be present in 
memory for this routine 
towork 


three points. 


Usin 


List of parameters used by the 





Start address 60300 Length 80-bytes— 
her_routines-eatted Line draw routine (FNg). 
Whatit does Draws a triangle given the 


the routine The routine uses absolute co-ordinates. 
Specifying off-screen co-ordinates produces- 


an 
message; values more than 255 pixels off the screen will 





required by the BASIC program. After keying in the 
routine, RUN the short BASIC program which 
accompanies it: this loads the code into memory. If you 
keyed in the DATA correctly, you will see an “OK” 
message on the screen; if not, you will see a couple of 
question marks. In this case, look again at what you 
have typed in to trace the mistake. 


3: SAVE the routine 

When you are sure you have keyed in the routine 
correctly, SAVE it onto cassette or Microdrive. Always 
SAVE machine code before using it, to minimize the risk 
of losing everything you have keyed in. When BASIC 
errors occur, an error message is usually produced but 
the program is not lost. Machine-code routines, 


however, do notgenerally have error-trapping facilities, 
and a fault in the code will as often as not cause the 
Spectrum to crash — deleting everything in memory. 
The machine code can be SAVEd in two ways: either 
in the form of DATA statements like any other BASIC 


Routine title (a single letter) 


Name of routine 


Number of bytes in memory 
taken up by routine 


Purpose of routine 





error - z 
Points to note when using 





routine, and letters used to 








describe these parameters 








probably cause the Spectrum to crash. Colours are set by the therontine 
current screen INK attributes. 
DEF FNi(x,y,p.q,r,S) 
xy specify first corner of triangle (x<256-y<176) What the parameters do 








Pq 


specify second corner of triangle (p<256,q<176}—]__ 


Maximum and minimum values 














rs specify third corner of triangle (r<256,s<176) 


of parameter to ensure the routine 
does not plot off-screen points 





BASIC loading routine for 















machine-code DATA 

Start address for POKEing owe Ler _b-sese0. LET Luo CET 
ze 7610 

DATA 7601 FOR ise TO 1-1. READ a 





(bei 





POKES byte value a into 7604 LET 2=INT 


location (bH) 





Start of machine-code DATA 








7514 


DATA 


pi LET z=z+a + oake Gc. A 
eee I | Calculates check digit z 
tezo- aru | 


ez) 
7605 READ a Je assz TAREN PRINT 
22". STOP 


@ DATA 42,11,92,1,4 
7611 DATA @.9,88, 14,8 
9594,237,83,208 
2å5,,86,9,%4 
237,83,210 ,235,9 








READs next DATA item, the 
routine check digit; if this is not 
the same as z, two question 
marks are PRINTed to show a 
mistake has been made 














are) Ee) 


listing, or, after you have loaded it into memory, as a 
block of code. To save machine code, type: 





SAVE “routine name” CODE start address, length in 
bytes 





The start address and length are given at the top of each 
machine-code box. The diagram on the facing page 
shows how this information is displayed. 


4: LOAD a BASIC program 

With the machine-code routine in memory, you can now 
use it in a BASIC program. DEF FN statements are 
used to tell the Spectrum the whereabouts of the routine 
in memory, and what information the routine requires. 


Using functions 

A machine-code routine can be called simply by 
specifying its start location, like this: 

10 RANDOMIZE USR 63000 


Aline like thisin a BASIC program, however, is not very 
informative. It tells you neither what the routine does, 
nor how many parameters the routine may require 
when called. This information could be POKEd into the 
appropriate memory locations — but the consequences 
of a mistake would be disastrous. Much more reliable is 
to pass information to the routines using a BASIC 
function. Functions on the Spectrum are identified by a 
single letter, and are followed by parameters in 
brackets, When you define the name and location of the 
function in your program, you must also specify the 
parameters, if any, which are to be passed to the routine. 
For example, the screen clear routine, FNa, requires 
four parameters 


10 DEF FN a(x,y,h,v) = USR 63000 


Which letters are used after DEF FN is not important: 
their function is only to tell the computer the number of 
parameters which will follow the routine call ina BASIC 
program. 

A machine-code function can be called from BASIC 
in two main ways, both of which require you to combine 
the keywords FN or USR with a BASIC keyword. 

The method used generally in this book is with the 
keyword RANDOMIZE. Thus, 


RANDOMIZE EN a(10,10,10,10) 


would clear a rectangular area of 10x10 characters with 
the top corner at point 10,10. Note that using 
RANDOMIZE also resets the random number 
generator with a new seed; this may cause problems if 
you are also using a random function in your program. 

The second word you can use to call machine code is 
RESTORE. However, RESTORE also resets the 
pointer to DATA statements when you use it — which is 
of course the purpose of the RESTORE statement. If 























you opt to use RESTORE instead of RANDOMIZE 
then be especially careful if there are any READ or 
DATA statements in your program. 





QUESTIONS AND ANSWERS 








What if I make a mistake in keying in? 

Don’t panic! Nobody keys in long lists of numbers 
without making any mistakes. A check routine is 
included with each machine-code routine to warn you if 
you made any mistakes in keying in the DATA. This 
routine compares the DATA you have entered with a 
check number, which is placed by itself on the last 
DATA line of each routine. 

After the loading program has POKEd the DATA 
numbers into memory, it looks to see if the check digit is 
the same as the one currently calculated. If the two 
numbers are different, the program prints two question 
marks to show an error has been made. If this happens 
look through the numbers you have typed in to find the 
mistake. Having corrected the error, you may still find 
that the routine fails to load correctly; look to see if you 
have made more than one error. 


Can I start anywhere in the book? 

Yes, you can start on any page, but obviously when you 
key in a program it will not RUN unless the machine- 
code routine it calls is present in memory. Check before 
you begin if the program you want to RUN calls any 
machine-code routines you haven’t already keyed in. 


Can I use more than one machine-code routine 
in my programs? 

Yes — you can use any combination of routines from 
this book together. The complete graphics editor 
program (pages 42-51) provides a convenient way of 
using machine-code routines together in a single 
program. 


Can I adapt the BASIC programs? 

Yes. You can edit the BASIC programs in any way you 
want to produce different displays, and you will find 
suggestions for variations throughout the book. One 
suggestion, though, if you are going to experiment with 
unusual or off-screen values for the machine-code 
parameters, is to SAVE what you have keyed in before 
experimenting. This will prevent you from losing hours 
of work at the keyboard! 


Can I adapt the machine-code routines? 

Yes, but at your own risk! Without a good 
understanding of machine code, itis highly unlikely that 
you will be able to alter any of the routines successfully. 
Much more probable is that the Spectrum would crash, 
with the result that both program and code are wiped 
from memory. 
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SCREEN COLOURS 1 





The Spectrum CLS command is used to wipe off any ink 
from the screen, leaving the PAPER and INK attributes 
for the screen unchanged. 

However, there are often occasions when you may 
want to clear a portion of the screen without disturbing 
the rest of the display. The partial screen clear routine, 
FNa, enables you to do this. It clears any rectangular 
portion of the screen, leaving the PAPER and INK 
attributes at their current setting. Itis used in a program 
by first defining the function (as in line 10 of the 
program below), and then calling it with a 
RANDOMIZE FNa statement (line 160). 








Colours on the Spectrum 

The Spectrum screen colours are set by the familiar 

INK and PAPER commands. However, although each 

character square on the Spectrum can have one INK 

and one PAPER colour, a command such as INK 2 
PARTIAL SCREEN CLEAR PROGRAM 





07000000 SO 


affects the whole screen, even though you may only 
want the command to affect a small area. How can this 
be done? It is possible to change the INK attribute of a 
single character square on the screen by PRINTing 
spaces in graphics mode and using OVER, or by finding 
the relevant memory location of the INK attribute, and 
POKEing the new value, but these would be very slow 
methods of changing the INK colour on more than a few 
squares. 


Changing colours with machine code 

The window ink routine allows you to change the INK 
colour of any rectangular area of the screen. Whatever 
you draw on this area of the screen will now be in the 
INK colour specified by the routine, while outside this 
area, colours remain in the current Spectrum INK 
colour. The routine also allows you to set the BRIGHT 
and FLASH attributes of the area you are specifying. 


WINDOW INK PROGRAM 





EF FN Bix, yh, Y, C, b, Fi at 
ORDER @ PAPER @ 
2,10 703 
ahi) 


INK a: c 


npuppmenneNag 
GOON TURONE ONE 
905602605659 609 


,@,2,22 


Ka 






































Start address 63000 Length 100 bytes 
What it does Similar to BASIC CLS command, but clears only a 
specified rectangular portion of the screen. 


Using the routine Parameter values in this routine represent 
character positions rather than pixel positions. As with all the 
machine-code routines in this book, parameter values must be 
whole numbers. 

If the result of adding x and his greater than 31, or if the sum of 
y and vis greater than 23, the area to be cleared will run off the 
Screen, and the routine may crash as a result. 
































DEF FNa(xy.h.v) | 
xy specify top left-hand corner of area to be cleared 
(x<32, y<24) 
hv horizontal and vertical size(x th<32, ytv<24) 
ZOE LET b=63000 LET t=95: LET 
ze 
7001 @ TO L-1 READ a 
z022 btid,a: LET zsz 
7003 NEXT i 
7004 LET z=INT ti(Z/U -INT (z720 
Ki 
7005 READ a: IF a<>z THEN PRINT 
ee": STOI 
7010 DATA 42.,11,92,1,4 
7011 DATA 2,3,36,1;83 
7012 DATA 0,3,34,237.,33 
7013 DATA 116,546,9,56,9 
7014 DATA 34.,237,53,118,245 
7015 DATA 237,31,116,246,123 
7016 DATA 254,23,240,237,83 
2017 DATA 115,246, 125,236,24 
7018 DATA 246,54,103, 123,230 
7019 DATA 7,183,351,31,31 | 
7020 CATA 31,130,111,56,116 | 
7@21 ODATA 246,71)197,229,6 
7022 DATA 8,197,229,568,119 
7@23 DATA 246,71,175,119,35 
7024 DATA 16,252,225,193,36 
7025 DATA 16,240,225,195,62 
7026 DATA 32,133,111,48,4 
7027 DATA 52,5,152,103,15 
28 DATA 222 ,201,0,0,98 
7029 DATA 82,0,0,0,@ 











Start address 62800 Length 135 bytes 








While the standard Spectrum screen graphics area is 
22 characters deep, with two lines reserved below this 
for text (lines 23 and 24), both the routines on this page 
can be used anywhere within the whole screen area, 32 
characters wide by 24 deep. 

The two programs on the facing page demonstrate 
the machine-code routines in action. Both programs 
begin by PRINTing a graphics character over the whole 
screen (lines 110-130). The partial screen clear program 
then clears five rectangular areas on the screen. The 
result is that the INK is deleted in these areas, while the 
paper colour remains unchanged. The window ink 
program calls the ink routine in two loops eight times 
across and down the screen, producing a grideffect. 








What it does Sets the INK colour of any specified part of the 
screen. 


Using the routine Be careful that you do not try to set the ink 
colours of points off the screen. Since parameters h and v are 
added to x and y respectively, this means that x+h should not 
be greater than 31, and y+-v should not exceed 23. If they do, 
you may crash the Spectrum and lose the program you were 
working on. 

If, when using the routine, it appears that nothing has 
happened, then either you have set the INK colour to what it 
was already, or the area you have altered contained no INK 
attributes. Try the routine again after printing something in the 
specified area. 

Note that the routine can set the ink colour over the whole 
Spectrum 32x24 character screen, not just over the normal 
32x22 graphics area. 








Se a eee oem 





[ DEF FNb(x,y,h,v,c,b,t) 














ii xy specify top left-hand corner of box area (x<32, y<24) 
h, ei specify horizontal and vertical sizes of area 
za (xth<32, ytv<24) 








specifies ink colour | (0<=c<=7) 
specifies bright (1—bright, 0=off) 
# || specifies flash (1—flash, O—off) 


7050 LET _b=62800: 

Z=@: RESTORE 7050 
7051 FOR iza TO 1-1 
7052 POKE 
7053 NEXT i 
7054 LET z=INT 


7955 READ a: 
“22"; STOP 





























LET t=130: 


READ a 
LET z=z+a 


LET 


tb+i) „a 
CHIZI -INT (z700 


IF a¢>z THEN PRINT 
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SCREEN COLOURS 2 





The Spectrum PAPER command sets the background 
colour of the whole screen. The window paper routine 
on this page, FNc, allows you to set the paper colour of 
only a part of the screen, in the same way that you can 
use the window ink routine to change the INK colours 
on a part of the screen. 

As for the ink routine, the paper routine requires you 
to specify the top left-hand co-ordinates and height and 
width of a rectangular area within which the colour is to 
be changed. Unlike the PAPER command in BASIC, 
you will see any colour change without having to clear 
the screen with CLS. Again, like the previous routine, 
you can use the routine to set the BRIGHT and FLASH 
attributes of the area. By calling the routine several 
times you can create a layered effect, with colours 
apparently superimposed on one another. 

A layered effect forms the basis of the random boxes 
program on this page. Random values are chosen for the 


RANDOM BOXES PROGRAM 





EF FN c(xX,¥.h.¥,¢,b,f) sUSR 


3 
dz Irrrrr naso 


DEBE REA 
OD- GIDUFURGIE 
0900090900006 














start co-ordinates (x1,y1) and horizontal and vertical 
increments (h1,v1) of the area, and a random colour 
value is chosen, before the routine is called, inside a 
loop. Note that the machine-code routine is called using 
RESTORE rather than RANDOMIZE. Using RAND- 
OMIZE would reset the seed of the random number 
generator within the loop, so that the same random 
number sequence would begin again and again. 


“MONDRIAN” PAINTING Line 10 defines the window 


PROGRAM paper routine, 
Lines 100-150 draw the black 

nn: fae 

OGG secona lines”. 


Lines 160-190 draw the 
How the program works coloured areas. 
‘The window paper routine Line 190 also stops the 
draws black “lines” (single program continuing until a key 
character-width boxes), is pressed, so that the bottom 
then fills areas of the screen two lines of the display are not 


with colour. lost. 










































































































































































































































































































































































































































































The “Mondrian” painting program demonstrates 
how by using only a single routine, you can produce 
quite an effective display. 

“MONDRIAN” PAINTING PROGRAM 





DEF FN 
02 BORD 
RANDOMIZE 


RANDOMIZE FN 


c gas 
ER $: 
Fr 


oe 
-ag 


RANDOMIZE 
RANDOMIZE 
RANDOM 
RANDOM 
RANDOMIZE 


© (24,0,1,24,0, 
1@,9,32,1,0,0 
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RANDOM EZ! (25,0,7, 
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RANDOMIZE 
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Start address 62600 Length 150 bytes 
What it does Changes the PAPER colour of a specified 
rectangular area of the screen. 


Using the routine The routine works in the same way as the 
window ink routine, except that here the PAPER attributes are 
changed within the area specified. As before, it could be 
dangerous to go beyond the limits set for the parameters, so 
the sum of x and h should always be less than 32, and y and v 
together should be less than 24. This is because h and v are 
relative, not absolute, parameters, which means they are added 
to x and y respectively to produce the values actually plotted. 
Thus, ifxis 15 and his 20, then the right-hand edge of the paper 
area is column 35, which is off the screen. 

As before, the routine operates over the whole Spectrum 
| 32x24 character screen, not just over the normal 32x22 
graphics area. 








E PARAMETI 
DEF FNe(x,y,h,v,c,b,f) E 
specify top left-handcorner of box area(x <32, y <24) 

















specify bottom right-hand corner of area (x+h <32, 
ytv<24) 














ea | Specifies paper colour (Osc =7) 





b specifies bright (1=bright, O=off) 




















F specifies flash (1=flash, O=off) 
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LET _b=62600: LET 4 
RESTORE 71 

FOR iza TO 
POKE (bei 
NEXT i 


LET z=INT 


READ a 
STOP 
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ENLARGED TEXT 





Doubling the size of Spectrum characters is quite 
straightforward in principle. Spectrum characters are 
drawn on a grid eight pixels by eight; they can be 
enlarged onto a 16x16 grid by the routine looking at 
each pixel of the 8x8 grid in turn. If a pixel is filled, then 
two pixels across and two pixels down are filled on the 
16x16 grid. The diagram below gives an example of a 
character and its enlarged version. 





HOW A CHARACTER IS ENLARGED 









8x8 grid 16x16 grid 








Both routines use this method to enlarge a string of 
characters (text or graphics) and then print them on the 
screen at twice their normal size. The horizontal text 
routine, FNd, prints enlarged characters across the 
screen; the vertical text routine, FNe, prints the 
enlarged characters downwards. 

The two demonstration programs below show how 
the routines are used. Both programs begin by defining 
the word “Spectrum” as the string (n$) to be enlarged by 
the routine, and both then POKE these characters into 
memory using a subroutine beginning at line 500, The 
string must always end with 13, the code for 
RETURN, to signal to the computer there are no more 
characters to be enlarged. The horizontal text program 
prints the string against a background of horizontal 
lines; the second program displays the vertical string six 
times, each time with a different coloured background, 
using the window paper routine. 

















DEF FN iae USR 62200 
BORDER 1: PAPER 6: INK 1: C 


Se 


9506991909650596899 59 








FOR iza TO 
BRAY SS5/8: BRAU 0,6 
DRAW -255,0: DRAU 6,6 
NEXT is 

PRAY 


PET ngs Spectrum” 
SO_SUB 599 

‘OR TO 22 STEP 4 
RANDONEZE FN 4i7,m) 
"a 





ALOCOAAT ANE Ree pete 
MNANE ANA 





Spectrum 











SSpectrum 








Spectrum 
































VERTICAL TEXT PROGRAM 









19 DEF FN ¢cix.u,h,¥,¢,b,f) =USR 
62500 


20 DEF FN © (x,y) =USR 61990 
100. BORDER 1, PAPER O: INK @ 


L: 
119 LET_ng="Spectrum™ 
120 SO_SUB saa 

130 LET cist 

TO 25 STEP 4 


FOR x=5 
RBNOOnIZE FN ¢(x-2,2,4,29,¢ 


RANDOMIZE AEN € 0099 
LET CLSC 
xT 















i=) 








LET k=62499 


BT i OY | 














Start address 62200 Length 220 bytes 
What it does Displays a double-sized version of specified 
characters horizontally on the screen, 


Using the routine Before using this routine, you must first use 
some BASIC lines to store in memory the text (n$) which you 
want to display, Lines 500-560 of the programs on the facing 
page provide an example. 

The text is stored as a string in 100 bytes of memory from 
address 62500 to 62600. The routine continues printing 
characters from this location onwards until it reaches a 
RETURN message. 

Note that with double-sized characters you are now restricted 
to 16 characters across the screen; longer strings are 
continued on the line below. To print a space in the text string, 
use the graphics blank character (above the 8 key) rather than 
the space key. 
| 





| 











Start address 61900 Length 215 bytes 
What it does Displays a double-sized version of specified 
characters vertically on the screen. 


Using the routine This routine works in the same way as the 
horizontal text routine, but prints text down the screen instead 
of across it. The same BASIC subroutine is needed to store the 
text string (lines 500-560 of the demonstration programs on 
the facing page). Remember to put the string into memory 
before calling the routine. 

Since each character is twice its normal size, only 12 characters 
down are shown in a column. The routine displays only one 
vertical line of text, and does not continue a message across to 
the next column. To display a message longer than 12 
characters, call the routine again for each new column of text. 
To obtain a space in the text use the graphics blank character 
(above key 8). 











DEF FN(x,y) a] 





specify position on screen from which text is to be 
printed (x<<32, y<24) 


EN 











LET _b=62200 t s215: 
RESTORE 7160 

FOR ise TO l-1: READ a 
POKE (b+i),a: LET 2=z+a 
NEXT 
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STOP 
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DATA 247,35,193,13,32 
241,43,125,245,43 
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DEF FNe(x,y) 
x, specify position on screen from which text is to be 
printed (x<32, y <24) 

7250 LET _b=619908 LET t=2120: LET 
z= RESTORE 72 
7251 OR 1=8 TO t-f: READ a 
7252 POKE (beid,a: LET z=z+a 
7253 NEXT 2 
7254 LET z=INT (((z7t)-INT (ZALI 
JELI 
7255 READ a IF a¢>z THEN PRINT 
22": STOP 
7260 DATA 42,11,92,1,4 
7261 DATA 0,9,66,1,6 
7262 DATA @,9,94,237,63 
7263 DATA 191,242,62,99,71 
7264 DATA 33,36,244,34,195 
7265 DATA 242,197,257,91,191 
7266 DATA 242,62,30,156,542 
7267 DATA 244,241,195,62,242 
7268 DATA 62,200,167 ,250,62 
7269 DATA 242,42,195,242,126 
7270 DATA 35,34,195,242,254 
7271 DATA 31,250,62,242,254 
7272 DATA 144,242,62,242,214 
7273 DATA 32,1,68,0,42 
7274 DATA S$4,92,36,9,61 
7275 DATA 32,252,34,193,242 
7276 DATA 123,239@,24,246,64 
7277 CATA 103,123,230,7,183 
7278 DATA 31,31,31,31,1350 
7279 DATA 111,34,169,242,205 
7280 DATA 64,242,58,191,2e42 
7281 DATA 60,60,50,191,242 
7282 DATA 193,16,169,201,193 
7283 DATA 201,17,157,242,6 
7264 DATA 32,62,0,16,19 
7285 DATA 16,252,237,91,193 
7286 DATA 242,33,157,242,6 
7287 DATA 3,197,26,1,2 
7288 DATA 4,197,23,245,203 
7289 DATA 22,241,203,22,16 
7290 DATA 247,35,193,13,52 
7291 DATA 241,43,126,245,43 
7292 DATA 126,35,35, 119,35 
7293 DATA 241,119,35,19,193 
7294 DATA 16.220,42, 189,242 
7295 DATA 17,157,242,14,2 
7296 DATA 229,6,8,26,119 
7297 DATA 35,19,26,119,193 
7298 DATA 43,36,16,245,225 
7299 DATA 62,32,133,111,45 
7300 DATA 4,62,8,132, 103 
7301 DATA 13,32,226,201,0 
7302 DATA 125,0,0,0,@ 
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PICTURES WITH POINTS 1 








The Spectrum ROM routine which is called by the 
BASIC command PLOT to draw single points is also 
used by the BASIC DRAW and CIRCLE commands. 

The point plot routine given here, FNg, is used in the 
same way, both to plot points on the screen, and to 
provide the basis for the other drawing routines in this 


COSINE CURVES PROGRAM 





f (x29) =USR 61590 
PAPER @: INK 2 


FOR j=240 TO 160 STEP -4 
FO! 1 To 510 
133450: 1005 


fa 
ET Y=ZNT 


Mapi 


RANDOMIZE FN 
NEXT m 
i 


Fm 





book, including routines for lines, boxes and circles. 

The demonstration programs on this page may seem | 
slower than you would expect. This is not due to the 
speed of the routine, but because the BASIC program is | 
switching to machine code for each single point and then | 
returning to BASIC. Later drawing routines, which call 
the point-plot routine from machine code, give a better 
indication of the routine’s true speed. The programs 
here show only the difference in speed between the 
BASIC commands RANDOMIZE and PLOT. 

The planet program plots random points on 
horizontal lines which begin and end on the | 
circumference of a circle. There is an increasing 
probability of a point being plotted towards the right of 
each line (line 540). The series of exponent curves are 
produced by varying the horizontal co-ordinate, x. 


COSINE CURVES 
PROGRAM 


10:30 minutes 


How the program works 
Over 10,000 points are plotted 
in a series of cosine waves. 


Line 10 defines the function. 
Line 130 sets the horizontal 
start co-ordinate of each curve. 
Line 140 calculates the y 
co-ordinate (each curve is a 
slightly different function, 
since j varies for each curve). 
Line 150 plots a point at m,y. 









































PLANET PROGRAM 


19 DEF EN 
50 BORDER @ 


110 LET r=50 


1 





Line 130 raises x to the power n to determine the point 
for plotting, z. Line 160 plots the curve again, 
subtracting co-ordinates from an initial value. 








FNf 


Start address 61500 Length 65 bytes 


What it does Plots a single point on the screen. 


Using the routine The point-plot routine uses pixel rather 
than character co-ordinates. Pixel co-ordinates are calculated 
from the bottom left-hand corner of the screen, unlike charac- 
ter co-ordinates which start on the Spectrum from the top left- 
hand corner. Thus, points are calculated on the screen from 0 
to 175 vertically upwards, and from 0 to 255 horizontally: 
point (255,175) is the top right-hand corner of the screen, for 
example. Note that routines in this book which use pixel points 
will not go over the text area of the screen (the bottom two 
lines of the screen) since the point (0,0) is actually above 
these two lines. 






R OUTINE P 
__DEF FNf(x,y) 


cify pixel position at which point is to be plotted 
256, y<176) 
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EXPONENT CURVES PROGRAM 








DEF EN fix 
BORDER 6 


FOR n=1.19 TO 














EXPONENT CURVES DISPLAY 
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PICTURES WITH POINTS 2 





The displays on the previous page used only a simple 
BASIC listing and a single routine, the point-plot 
routine, There is no reason why you should not combine 
routines together to produce far more complex displays, 
as demonstrated here. 





The cityscape program 

The large display on this page is produced by a single 
program, the cityscape program. The program 
combines plotted points with three other routines to 
produce the display. 

A total of four routines is used in this program. The 
skyscrapers are drawn by the window paper routine, 
FNb; the vertical text routine (FNe) is used to draw the 
word SINCLAIR, printed in blue by the window ink 
routine, 

The effect of a crowded group of skyscrapers is 
achieved by drawing coloured windows at random. The 
effect of random heights but a constant base line is 
achieved by making all the windows end on the bottom 
line of the screen. This is done by subtracting the start y 
co-ordinate (y1) from 25, the total number of vertical 
text characters on the screen plus one. 

The vertical text routine, which is used to print the 
word “SINCLAIR”, must have the letters which are to 
be displayed placed in memory before the routine is 
called. Lines 110-170 take the characters from the word 
one at atime and POKE them into memory ready to be 
used by the routine, As before, the final character 
entered is 13, the ASCII code for carriage return. You 
will remember that the routine requires the co-ordinates 
of the top left-hand character (x,y) as well as the stored 
text string in order to print the text. The window ink 
routine is used in line 360 to give a blue colour to the area 
over which the text is to be printed. 








bis, ysb, C, b, USA 


€ (x.y) BUSR S2909 
i E, f) sUsR 


use 61520 


NEXT i 
RANDOMIZE FN £ 


78,8) 
24a FOR i 


21 To so 


scrort? 








Line 210 calls the point-plot routine to plot the stars. 
Random co-ordinates are chosen in lines 190 and 200 
for each star. The moon is drawn in lines 530-560 by 
using semicircles nested inside each other, using the 
Spectrum BASIC DRAW command. A later routine in 
this book will enable you to produce circles using 
machine code. Finally, the meteor is drawn as a series of 
straight lines (lines 490-510), again using BASIC. 

You will notice from the listing for this program that a 
convention has been used for all the listings in this book. 
Lines numbered from 10 to 90 are used for the function 
definitions, while lines 100 onwards are used for the 
main listing. You can thus see clearly which machine- 
code routines have been used for each program, as they 
are placed at the beginning of the listing. 












































CITYSCAPE PROGRAM CONTD. CITYSCAPE PROGRAM CONTD. 


RANDOMIZE FN ¢(4,4,1,1,6,2, 


NEXT i 
RANDOMIZE FN 


RANDOMIZE ct16,9,1,15,4, 
RANDOMIZE FN c(17,65,2,15,4, 
RANDOMIZE €{419,10,1,14,4 
RANDOMIZE b(17,6,2,18,1, 


EN €(17,6) 
FN ¢(4,47,5,14,2, 


TO 22 STEP 
ER isa Le Boks 








iat? CITYSCAPE PROGRAM 


OOS seconds 


This program calls four 
routines, all of which must be 
present in memory before 
RUNning the program: 


MINA ti 
TAIRA is 





window ink routine (FNb) 
page 11 

window paper routine (FNe) 
page 13 

enlarged vertical text routine 
FNe) page 15 

point-plot routine (ENT) 
page 17 








How the program works 
Lines 10-40 define the 
routines. 

Line 110 defines the text 
string. 

Line 120 sets up a loop to 
POKE characters into 
memory. 

Line 130 POKEs a single 
character into memory 

Line 170 POKEs ASCII code 
13 into memory. 

Lines 180-220 print stars at 
random points in the top 74 
pixel rows of the screen. 

Lines 240-320 set up values 
for the window paper boxes 
and draw them — a total of 50 
boxes. 

Lines 330-380 draw the 
“buildings” with windows 
which appear in front of the 
paper boxes (lines 340 and 360 
print flashing boxes). 

Lines 480-510 draw the 
comet. 

Lines 520-570 draw the | 
moon (a series of sem | 
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LINE GRAPHICS 1 





Lines are drawn in BASIC on the Spectrum using the 
command DRAW. This command uses relative co- 
ordinates, that is, the command is followed by co- 
ordinates which specify the distance from the current 
plot position, A line is then drawn from this point to the 
specified point. Itisn’t always as simple as it may seem to 
calculate this horizontal and vertical increment from 
the current plot position. 


The line-draw routine 
The routine on this page, FNg, offers an alternative to 
Spectrum DRAW for drawing straight lines. This 
routine is faster than the DRAW command, and uses 
absolute, rather than relative co-ordinates. Thus, you 
no longer have to worry about calculating distances 
from the current plot position. 

The line-draw routine contains some error-trapping 
to prevent the Spectrum crashing if the routine is called 


CUBE PROGRAM 
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SUNSET PROGRAM 


10 DEF FN cix, yh, Y, C, b, f SUSR 
ao 
2g DEF EN g (x4 p.92 -USR_ S2702 


BORDER @- 


310 RANDOMIZE FN t(0,0,32,17,2, 


$9.79 174 STEP 12 
gto, 5,126,40) 
FN 31268) 37188;40 


2ss STEP 


j26_to 12 
RANDOMIZE FA 9 (J. 175,126,40 


NEXT j 

FOR j=36 TO © ST 
8 RANDOMIZE PNU ABA ¥D) J, 
EREDE 
© NEXT j 












































with off-screen co-ordinates. This makes it easier to 
devise complex graphics displays using a trial and error 
method, since there is less danger of losing both 
program and routine if off-screen co-ordinates are 
entered, 

The cube display on page 20 is formed from a series of 
lines. The program is very simple. The line draw routine 
draws four lines repeatedly in the loop from lines 120 to 
170: two to draw the grid pattern, and two for the pers- 
pective effect. Lines 180 and 190 specify the two lines 
which complete the cube shape. 


SUNSET PROGRAM Line 110 sets the blue colour 


in the bottom part of the screen 


GOOF scconas 


How the program works 
Yellow lines are drawn 
radiating from a point at the 
centre of the screen to points on 
the edge. Horizontal lines are 
then added to create a reflec 
tion effect. 


using the window paper 
routine, 

Lines 130 and 140 draw the 
horizon, 

Lines 160-180 draw the 
yellow lines in the sky 

Lines 190-210 draw the 
horizontal lines on the lower 
half of the screen. 
















































































































































































































































































Hf 


ft 
ag 



















































































a 


| 
| 





LINE-DRAW ROUTINE 








Start address 60700 Length 205 bytes __ 
What it does Draws a line between two specified points. 


Using the routine This routine draws a line joining any two 
pixel points on the screen. Although the Spectrum already has a 
line draw routine available in BASIC, the version given here is 
much faster, and uses absolute rather than relative co- 
ordinates. Ths means that co-ordinates p,q represent the 
position of the end point of the line, not the horizontal and 
vertical increment from x,y. 

The routine will usually work if off-screen points are specified, 
but for safety some error-trapping has been incorporated. If you 
attempt to plot lines off the screen, you will see an “Integer out 
of range? message, unless the value you have entered is more 
than 255 pixels off the screen; in this case the routine will 
probably crash. 






































| ROUTINE PARAMETERS 
DEF FNg(x, 1) 
| xy specify start position of line (x<<256;y<176) 
Pq [specify end position of line (p<256,q<176) 
ROUTINE LISTING 
7400 LET b=60700: LET t=21@: LET 
Z=O: RESTORE 7410 
7401 FOR i=@ TO L-1 REAO a 
7402 POKE (b+id,a: LET zZ=zt+a 
7403 EXT i 
Arion LET Z=INT (CCzet) -INT (z7t) 
* 
7405 READ a: IF a<>z, THEN PRINT 
“<7: ae 
7410 DATA 42,11,92,1,4 
7411 DATA 0,9,56,14,6 
7412 DATA 3/94,237,83,26 
7413 DATA 237,205,226 5397,94 
7414 DATA 42,46,257,217,229 
7415 ATA 217,237,115,175,237 
7416 DATA 1,1,1,122,148 
7417 DATA 210/76,237,6,255 
7418 DATA 257,68,87,123,149 
7419 DATA 210,80,237,14 5255 
7428 DATA 237,66,95,122,187 
7421 ATA 48,10,106,257,67 
7422 DATA 177,237,175,74,195 
7423 DATA 107,237,178,202,167 
7424 DATA 237,187,90,437,67 
7425 DATA 177,237,14,0,9 
7426 DATA 123,31,133,215,115 
7427 ATA 237,165,216,126,237 
7428 DATA 148,87,217,237,91 
7429 DATA 177,297,195, 132,297 
7430 DATA 87,197,217,209,42 
7431 DATA 26,237,123,133,95 
7432 DATA 122,60,1392,216 5,164 
7433 DATA 237 ,202,167,237,61 
7434 DATA 87,237,53,26,237 
7435 DAT! 205,179,237 ,217,122 
7436 DATA 29,32,205,195,167 
7437 DATA 237,202,147,237,237 
7436 ATA 123,175,237,217,225 
7439 DATA 217,201,161,214,1 
7448 DAT! 1,62,175,147,216 
7441 OATA 249,36,95,167,51 
7442 DATA S$5,51,167,31,171 
7443 DATA 230,245,171,105,122 
7444 DATA 7,7,7,171,230 
7445 DATA 199,171,7,7,111 
7446 DAT 122,230,7,71,4 
7447 DATA 62,254,15,16,253 
7448 DATA 6,255,166,71,126 
7449 DAT 176,119,201,229,197 
7458 DATA 205,179,237, 193,225 
7451 DATA 9,86,9,201,0 
7452 DATA 192,20,0,0,0 
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LINE GRAPHICS 2 


Line-drawing routines are ideal for producing 
interference patterns. These are produced when a series 
of lines or points are drawn so close together that what is 
produced is neither separate lines nor a complete solid, | 
but a pattern. 

The pyramid program below shows interference 
patterns at work. Each pyramid is drawn by a 
subroutine beginning at line 500, which draws lines 
from the top of the pyramid (the fixed point tx,ty) to 
points along a horizontal base line (by). Only the base 
x co-ordinate (x) is varied within the loop. Interference 
patterns are seen from near the top of the pyramid 
(where the lines no longer have the appearance of a solid 
figure) to a point towards the base of the p yramid 
(where lines are beginning to be seen distinctly 

The line pattern program demonstrates a related 
phenomenon. Here the line-draw routine (called in lines 
140-170) has the paradoxical effect of producing 














LINE PATTERN PROGRAM 








3 FOR jz 
(146 RANDOMIZE 
1150 RANDOMIZE 


150 RANDOMIZE 


50-3) 
7172 RANDOMIZE 


202 NEXT 





PYRAMID PROGRAM 


10 DEF FN bix,y,h,V,C,b, f) sUSR 

62500 

SO DEF FN cix, Yh, V, Cb, fF? =USR 
og 


s26 
30 DEF EN ) =USR 69700 
NK 2 


AA 
BORDER PAPER 1: T 
@ ELS 
RANDOMIZE FN c(0,8,31,14,6, 
LET 


5 LET by=60 


7 LET bsise 
Go SUB 530 
Raza TO b 


LINE PATTER} 








DISPLAYS. 
































































LINE INTERFERENCE PROGRAM 


curves. The series of horizontal and vertical lines in 
sequence produces the curve effect. As the lines become 
closer together, with each successive display, a better 
effect is obtained. 

The line interference program shows how a program 
similar to the line pattern program can produce 
interference patterns simply by increasing the number 
of lines plotted on the screen, from 150 to 255 (the 
variable i in line 130). 

















| 





LINE INTERFERENCE 


LINE INTERFERENCE DISPLAY pi 








PROGRAM 


OD: DG seconds 


How the program works 
Patterns are produced by 
drawing lines from cach corner 
of the screen to the opposite 
screen edge 

Line 120 sets up the first loop, 





to draw complete displays, 
Line 130 sets up the second, 
inner loop, which calls the 
routines 255 times to draw a 
single display 

Lines 140-170 call the line 
routine to draw four lines, 
Line 190 waits for a key to be 


pressed before clearing the 
screen and beginning the next 
display. 

















TRIANGLES d 


A triangle shape is useful as the basis of all kinds of REPEATED TRIANGLES PROGRAM 
graphics displays. Pyramids, mountains, trees and 
bushes can all be formed from a triangular shape; even 











the spotlight display on this page is drawn with 10 DEF FN i (x.u.P.4,7,5)=USR 6 
triangles. However, Spectrum BASIC does not have a BORDER 6: PAPER 6: INK 2: © 
single-statement triangle command. “Zao Let r263: LET xc=127: LET y 
The triangle routine, FNi, enables you to draw FOR i=7 TQ 2 STẸP -1 | 
triangles quickly and painlessly. Like the line-draw 129 RBNDGHIZE FN i tke c2sG,uc-u, 
ie aie re 2 5 hi KEZICHI, KE FU,UC-UI 
routine (FNg), on which it is based, the triangle routine 1S8 NEXT a 


z 5 - 169 pAUSE o: cs 
uses absolute rather than relative co-ordinates; this 170 NEXT i 
makes complex graphics displays easier to program. 
All the displays shown here make use of the routine 
within a loop or loops. The repeated triangles program 
is based on triangles plotted between two parallel lines. 
Several interesting modifications are possible here: try, 
for example, changing the first x co-cordinate of the 
triangle from xc-2+y to xc-y. This will produce 
parallelograms between the parallel screen edges. 
The spotlight display is produced by drawing a series REPEATED TRIANGLES 





along a straight line, by 








of triangles froma single point (5,170). The base ofeach PROGRAM changing the variable y for 

triangle is a horizontal line, the end points of which lie each successive triangle. 

on the circumference of a shallow ellipse. 80:03 seconds Line 120 begins the first loop, 

The final program, the triangle curves program, is a iat t wae eee ie ciran 

display of curves produced fromseguencesoftriangles. | Am wao artween each triangle in ne 

Th WA esa LYTRETouTeS he program draws a series of display 

The outer and inner curves are pro y th Ines triangles. Each of the three Line 130 sets up the second 

called in lines 130-140 and 180-190 respectively. | points of the triangle is moved loop, which draws the pattern. 
nat yi al ATT 


eat NA 
PEO 


























SPOTLIGHT PROGRAM 


DEF FN itx, Y Par 
BORDER ©: PAPER @ 
LET s=4 











FNi 

















TRIANGLE DRAW ROUTINE 





Start address 60300 Length 80 bytes 

Other routines called Line draw routine (FNg). 

What it does Draws a triangle given the pixel co-ordinates of 
three points. 


Using the routine The routine uses absolute co-ordinates. 
Specifying off-screen co-ordinates produces an error 
message; values more than 255 pixels off the screen will 
probably cause the Spectrum to crash. Colours are set by the 
current screen INK attributes. 


ROUTINE PARAMETERS 
DEF FNi(x,y,p.q,r,s) 
X,y || specify first corner of triangle (x<256,y<176) 


Prq |[specify second corner of triangle (p<256,q<176) 




















area to red using the window ink routine, 





Line 160 of the curves program sets the central screen 
Vb (which 
must be present in memory for the program to RUN). 





r,s | specify third corner of triangle (r<256,s<176) 











ROUTINE LISTING 





7600 LET 6=60300: LET 1275: LET 
228, RESTORE 7510 
7601 FOR @ TO t-2: READ a 

ET z=z+a 


7603 POKE 
NEXT 

7604 LET z-INT 

7605 READ a: IF acoz 

eee ae 


feriva 
Cetz7t) -INT 
THEN PRINT 


z7 


[e] 
Do 
44 
D 
~N 
v e e 
iT 
w 


é 
3 
n 


N~ NADD- 


go00000' 
N- Ws wo 


DDDDDD 
434444 


9 
D 
4 
DDDDDDD 
OPONON FHUMONNOSF 
WSHOHY NVORRDOQ- 
Ste Ge Allert 
BRN. N- 


ag 


ag 


DATA 


ANNA 

A AAARAATATG X 

N ke Y 

9 YAAN 
N- U> DAI 
w Oe 


CON ONEN O 
vy 


WIVU FANPOLAN 
ooo 


sees 0 600 8 


DEOSN ONON- VO. 
97 NN- 





SAQUEN BNON- Oo 0e 


S4208 NO QOH NO 
| SS Sco oes © 


1 
é 
3 
a 
3 
2 
a 
5 
a 
5 
i 
ó 


HALA KUA 


OUN NN 




















TRIANGLE CURVES PROGRAM 





bix 
Sa 
DEF FN ii 
QORDER + 





FOR aso To 
RANDOMIZE 
RANCOMIZE FN. 


RANDOM 
55,175 




















CIRCLES AND ARCS 1 





Two methods are commonly used to draw circles on a 
computer. The first uses a combination of sines and 
cosines; this is the method used to draw circles in 
Spectrum BASIC. The sine/ cosine method is derived 
from the fact that, for a right-angled triangle, the length 
of the horizontal and vertical sides can be calculated 
from the size of one angle and the length of the third 
side. If a right-angled triangle is formed between the 
centre of a circle and any point on the circumference, as 
shown in the diagram below, then the length of the sides 
is given by 





x =r * cos (a) 

y=r sin (a) 

You can see a typical example of circles plotted in 
Spectrum BASIC in the circle program on this page. 
The command requires the centre-point and radius to 
be specified (x,y and r). 





BASIC CIRC. 





ES PROGRAM 


INK 








DRAWING A CIRCLE USING SIN AND COS 











X=recosa 
y=rssina 





The second method is faster in operation but requires 
more memory to implement. This method, based on 
squares, forms the basis of the machine-code routine 
It is derived from the equation 





This, of course, is Pythagoras’ theorem, which gives the 
relation between the sides of a right-angled triangle, as 
shown in the squares method diagram below. 





This method is more complicated than the sine 
cosine method, since it must calculate square root 
values each time a circle is drawn. To use it most 
effectively, first calculate a list of square roots and then 
store this list in memory — as done by the routine at 
address 59600. The list of square roots can then be 








__ DRAWING A CIRCLE USING SQUARES 


“consulted” by the main routine. Using stored square 





AI 


/N 


| 
CL 





Xaxtyeyarer 
y=SQR(rer—x*x) 


roots makes this routine much faster — and more 
accurate — than using the BASIC CIRCLE command. 


Using the routines 

Together with the BASIC square loader program, the 
routines given here do the work of calculating points for 
circles to be drawn. After keying in these routines you 
will not yet be able to produce anything on the screen, 
because the routines do not in themselves draw any 
curves; for this you must also key in one of the curve 
routines in the following pages. 
























































29 
7720 CATA 50,115,292,56,1134 
7721 DATA 232,265 ,19,252,58 
7722 DATA 116,232,71,58,115 
7723 DATA 232,144,200,58,115 
dd 3325 BATA 130,552,71,53,131 
Start addresses 59600 and 59000 | 2726 DATA 252,144,52,34,50 
Length 60 and 525 bytes | 7727 DATA S0,i33,292,59,121 
3 oy ” | A 232, 31,48, 
Other routines called Point-plot routine (FNf). $355 BATA 55,1156,232,56,124 
What they do Carry out the calculations for the arc, sector and S9RR GHA UON. IUD.. SSL. Se 
9 | j PeP n 
segment routines. 7731 DATA 116,232,71,58,119 
A i 7732 DATA 232,144,58,124 ,252 
Using the routines The following BASIC program must be 2235 BATA 125-2438 26°% 28° 202 
keyed in and RUN before using the machine-code routines given 2735 DATA 230/1,32,8,55 
here: 7736 DATA @,50,124,252,195 
AA VAA TALE 
10 LET j= 59700 $336 DATA 232,71,53,105,231 
20 FOR i= 0 TO 255 7740 DAT 18,0 5,16 
vend A 17,18,0,25, 
30 LET p—i*i: LET h= INT (p / 256) 7743 DATA 353,94 ,i25, 252.55 
x D 232, 21,42 
40 LET |= p—256 * h 7743 DATA 91,58,122,252 52, 
Tis 4 122,232, a , 
50 POKE j.l: POKEj +1,h 7745 DATA 42,125,232, 233,20S 
60 LETj=j+2 7746 DATA 81,232,588, 122,232 
7747 DATA 33,124,232,199,40 
70 NEXT i 7748 DATA 43,609,250, 93,2931 
| 7749 DATA 24,225,56,122,2352 
This program POKEs the squares of numbers from 0 to 255 into | 7750 DATA 71,58,119,292,167 
memory. Each square is stored in two bytes, since numbers #232 DATA 144 gos ata BAA 
larger than 16 squared will not fit into a single byte, which has a 7753 DATA 235,205,61,232,58 
maximum value of 255. Having keyed in this routine, SAVE the eZee CATA tee soca WA SEA 
area of memory containing the squares by using the command z288 BATA 3862324726785 ‘Se, 
SAVE “title” CODE 59700,600. These 600 bytes are also used 7758 DATA 232/52,0,56,135 
as workspace by the circle routines. FAOS CATE NGASA DI ISSA 
The routine at 59600 calculates sguare roots and stores them 7760 DATA 200,254,1,202,205 
in memory. The longer routine, starting at address 59000, cal- S7282 DETO pea, DS LES mna aT 
| jo! he circu j 7763 DATA 111,252,130,87,58 
cu lates p us on the circumference of a circle using these 7269 DATE 204 bee) Poor S6 ror 
square roots. 7765 DATA 43,431,95,56,122 
7766 DATA 232,87,58,111,232 
7767 DATA 1390,87,58,110,232 
7766 DATA 131,95,195,80,231 
7769 DATA 95,$8,122,332,87 
7658 LET S596090: LET 1255 Ler 7770 DATA $6,.111,232,146,87 
Z2@: RESTORE 7660 7771 DATA $S8,110,252,131,95 
7651 FOR i=ð TO l-1: READ a 7272 DATA 195,435,251,37,58 
AA rg eee er BEEE AERA 
7654 LET Z=INT {{(z7t) -INT zi 2775 DATA 233,191,95; 19$,50 
76S5-REQD 3: IF atz THEN PRINT 3335 BATA 35,55,111,252,148 
: STOP 7778 DATA 87,.55,110,252,147 
Semanionns sees sae 3379 DATA 95,19$,43,231,35 
7661 DATA 187,52,1, 204,23 7780 DATA 55,122,232,87,58 
3883 BATA 10,183/187,2357.52 7781 DATA 111,232,146,57.58 
7664 DATA 242,234,033,3 134 2762 RATE 2102822 rea 
7665 DATA 242,17.202,22,96 2783 BATA $9,283.23 -994 252 
7666 DATA 105,25, 124,167,312 sees ae J 
7667 DATA 125,31,201,33,52 2285 ONTA 299,87 932178255 
$866 DATA 3533/2206 > aa’ 7786 DATA 147,95,195,43,231 
DATA 1 3a 35 3594 7787 DATA 87,58,122,292 ss, 
$253 Bete dS aó 2615070 7788 DATA S8,111,232,130,57 
5671 BATA 320,0,0.0” ’ | 7789 DATA S8,110,232,147,95 
779% DATA 195,8@,231,6,5 
7791 DATA 203,63,16,252,68 
7792 DATA 201,290,31,254,2a 
7793 DATA 200,71.175,79,237 
3538 BELA stadtzaegeige-* 
7709 LET bz52022; LET 1-520: LET 2798 bata Sż,1,50,16,247 
7701 FOR i=0 TO l-1: READ a 278% SATA 3933734723 
2283 DORE tbri),à: LET zazia 7798 DATA 167,203,29,203,25 
3383 NEXT i oe b. 7799 DATA 203,26,203,27,16 
Toes LET z=INT ¢(¢(z7ts-INT (zt) zaa para RE 2642232 322 
eee GORAS Tn” NOLE ENEN BEER 2802 DATA 232,42,117,232,167 
3882 BATA 235 E Toa 
771@ DATA 62,1,50,104,232 i 2 a v 
?711 DATA $8,112,452,405,245 BeOS DOTA 252) eet oy oes ear 
7712 DATA 232,237,53,117,232 i = 4337; 
7713 DATA 157,203, 36,283 ,27 2287 BATA eed SSS seks 7a S80 
7714 DATA 205/293,232,58)1i9 2898 BATA Sei e096. 465" 
7715 DATA 232,52,113,232,205 7810 DATA 52,136,46e,148,30 
7716 DATA 11,232,50,120,232 7611 DATA 20,170,15,11,132 
7717 DATA 58,114,232,205,11 7812 DATA 3,21,7;6,0 ~ 
7718 DATA 232,50,121,232,585 7813 DATA 1,10,213,231,0 
7719 DATA 113,252,205,19,252 | 7914 DATA 234,0,9,90,9 | 
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CIRCLES AND ARCS 2 





With the arc routine, FNj, given on this page, you will be 
able to draw arcs more quickly and with more flexibility 
than with the Spectrum DRAW command. The routine 
can be used to draw either arcs or complete circles by 
varying the final two parameters. 

To produce any circle-based program on this page, 
you must first key in the machine-code routines and the 
BASIC squares program on page 29, as well as the 
routine given on this page, since the arc routine calls all 
these routines. 


Starting and finishing the arc 

The only complication of the arc routine given here isin 
specifying how much of the circle is to be drawn. The 
start and finish parameters can have values from 0 to 
255, instead of 0 to 360, This is because the parameters 
are stored in a single byte in memory, and one byte can 
have only 256 values (thatis, from 0 to 255). This means 


ARC PATTERN PROGRAM 





10 DEF FN j (x sys ss, fD) 


100 BORDER 1. PAPER 6: INK 2 

1 <c2138: LET 
<4. 

a INT (972) 

Yee iNT 9,127) 

Ó NEXT + 


that s,f values of 0,255 will draw a complete circle, 
values 0,127 will give a semicircle, and so on. 

Since the routine begins drawing from a position 
horizontally to the right of the selected centre point, 
s,f values of 0,64 will produce a quarter circle from the 
right of the centre to a point vertically above it. The 
diagram below shows how the start and finish 
parameters correspond to the more usual degrees. 








CALCULATING POINTSON A CIRCLE 





Using 
degrees — 
” 
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FET 
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FNj 
ARC ROUTINE 














ROUTINE PARAMETERS 











| DEF FNj(x,y,r,s,f) 
Start address 58900 Length 45 bytes x,y || specify the centre point from which the arc is drawn 
Other routines called Master curve routines. y (x<256,y<176) 


What it does Draws an arc or circle at a specified radius from 
a centre point. 


Using the routine The table on the facing page shows how 
the s and f parameters specify the length of the arc. A dif- 
ference of 255 will produce a complete circle, 127 a semi- 
circle, and so on. The numbers themselves define the angle 
from the centre of the circle at which the arc starts and 
finishes. The arc is drawn from a position due east of the 
centre of the circle, so that an s or f value of 1 is to the right of 
the centre point, a value of 128 to the left, and a value of 192 














r specifies the radius of the arc (r<256) 


























sf || specify the length of the arc(s<f, s<256,f<256) 
~ ROUTINE LISTING 
7850 LET b=sssee@- LET L-40. LET 
723° RESTORE 2360 


L-1: READ a 
sā: LET z=z+a 


CCC27U-INT (z7) 

















directly beneath the centre of the circle. 855 2457 THEN PRINT 
Unlike CIRCLE in Spectrum BASIC, you can draw curves with | > 
this routine which go some distance off the top or bottom of the | 338? Bara ond za 
screen without an error message appearing. 7962 DATA 9,9 Z61123 
Berang of the way the r Een memory Warns, there are | 7854 BATA 232 ise 113 
several screen positions where a curve cannot be drawn using yi TA 232 pean 
this routine. If you find the routine does not work in any position. 3869 BATA ise 37248°8s0 
move the centre point one pixel in any direction 7868 DATA 17, 

| CONES PROGRAM 




















DEF FN 
BORDER © 
CLS 


jeuri 
PAPER © 


f) =USR s89 
INK 6 


j (254-1 #5, INT 


The cones program produces patterns by varying the 
x and y co-ordinates of the centre of a circle each time it 
is drawn. In the left- and right-hand patterns, the x co- 
ordinate is a function of the variable i, while the y co- 
ordinate is given by i raised to the power of 1.7. As a 
result, the circles appear on a curve. In the third loop, 
only the y co-ordinate is varied, so that the sequence of 
circles rises vertically. 








CONES PROGRAM 
:77 
oo s l 1 seconds 


How the program works 
Three cle patterns are 
drawn, using the circle routine 
within a loop. 


Lines 120-140 draw the left 
hand circles. 

Lines 150-170 repeat the 
above loop, reversing the x,y 
co-ordinates. 

Lines 180-200 draw the 


centre circles. 




















32 














SECTORS AND SEGMENTS 





The two routines on this page are useful supplements to 
the circle routine introduced on pages 30-31. Sectors 
are constructed by drawing an arc and then joining the 
end points to the centre from which the arc is drawn. A 
segment differs from a sector in that the ends of a 
segment are joined to each other, rather than to a centre 
point. The advantage of the routine is that they enable 


you to join the ends of an arc together without having to 
work out the co-ordinates of those points. 

Both the sector and the segment routines call the 
master circle routine (page 29), the arc routine, FNj 
(page 31) and the line draw routine, FNn (page 21). 
This means that the sector and segment routines will not 
work unless these other routines are presentin memory. | 














10 DEF FN Kix ,usr.s.f) USR Se 


WA BORDER ©: PAPER @: INK 4 


110 LET c=s@: LET 
za 


29 FOR 











The sector program on this page creates the illusion of 
a third dimension by repeatedly drawing smaller and 
smaller sectors while at the same time moving the centre 
point upwards and to the right. Try varying iin line 120 
to see a different number of sectors displayed. 

The segment program repeats a pattern of segments 
(drawn froma single centre pointin lines 140-150) three 
times across the screen, The number of patterns can be 
increased by varying the step size of x in line 120. 


SECTOR PROGRAM 


drawn in one display. 
B 7:7 l 
LI `i iÍ seconds 


Line 130 sets up a loop to 
val used to calculate the 





centr 


How the program works A 
sector of a circle is drawn 
repeatedly with decreasing 
radius. 

Line 120 sets up a loop to 
vary i, the number of sectors 











point and the radius. 
Line 140 draws a single 
sector. 

Line 160 waits for a key to be 
pressed before drawing the 
display again. 























uu ui. 














FNk 
SECTOR ROUTINE 











FNI 
SEGMENT ROUTINE 














Start Address 58800 Length 45 bytes 

Other routines called Arc and line-draw routines (FNj, FNg). 
What it does Draws an arc of specified radius, and joins each 
end to the centre point. 


Using the routine The sector is drawn anti-clockwise from a 
point to the right of the centre. When the ends of the arc are 
joined to the centre, the result is a wedge shape if the difference 
between s and f is less than 127, or a cut pie shape if the differ- 
ence is greater than 128. Sectors plotted off the screen to left 
or right may reappear rather unpredictably elsewhere on the 
pees so it is best to keep within the parameter limits given 
elow. 





ROUTINE PARAMETERS 
DEF FNK(y,r,S,f) 














xy specify the centre point from which the arc is to be 
it drawn (x<256,y<176) 








r specifies the radius of the arc (r<256) 





Sf |{specify the length of the arc (<I, s<256, f<256) | 














i LISTING 






7900 LE a LET 1240 LET 
ze RE 10 

7901 FO t-2 READ a 
7302 POI a LET z=z+a 
7903 NEXT i 

7984 LET z=INT (€(z/t)-INT (270) 
ae) 

7905 READ a IF a¢>z THEN PRINT 
“eg: STO 

7910 DATA 205,20,230,237,91 
7911 CATA 106,232,42,110,232 
7912 DATA 229,0,34,26,237 

7913 CATA 205,51,237,237,91 
7914 CATA 1038,232,225,34,26 
7915 CATA 237,205,51,237,237 
7916 CATA 31,110,232,205,72 
7917 CATA 246,201,0,0,0 

7918 DATA 35.0,0,0,0 





Start address 58700 Length 30 bytes 

Other routines called Arc and line-draw routines (FNj, FNg). 
What it does Draws an arc of specified radius from a centre 
point, and joins the ends together. 


Using the routine This routine works in the same way and 
with the same restrictions as the sector routine, except that in 
this case the ends of the arc are joined together, rather than to 
the centre. 

Notice that, like the previous routine, you may get problems 
trying to connect the ends of the arc together, if either of the 
end points (and especially if both of them) are off the screen. 
As before, segments plotted off the edge of the screen to left or 
right will have unpredictable results: they may reappear on the 
other side, or cause the Spectrum to crash. 

i 


| ROUTINE PARAMETERS 
DEF FNI (x,y,r,S,f) 


xy specify the centre point from which the arc is to be 
™ _|| drawn (x<256,y<176) 


r | specifies the radius of the arc (r<256) 




















aj 


s,f |[specify the length of the arc (s<f, s<256, f<256) 























ROUTINE LISTING 3 = 








7959 LET bese7ee, LET Laas: LET 


7951 FOR ise TO l-1: READ a 
7952 POKE (b+i),a: LET zazia 


XT ìi 
7954 LET Z=INT (((Z2/4)-INT (z7b) 
7955 READ a. IF a<>z THEN PRINT 
n72 STOP 




















DEF FN tixy, riS, f) sUSR 
BORDER 4: PAPER 4: INK 1 


y=29 

172 STEP 4s 

FOR a TO 80 STEP 10 
RANDOMIZE FN L(x.4,i,125,19 


RANDOMIZE FN Lix,¥,2.0,63) 
NEXT i 
NEXT x 
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FILLING SHAPES 1 





The fill routine given here, FNm, enables you to fill any 
enclosed shape no matter how irregular. The routine 
works by looking at the pixels adjacent to the specifed 
start point. If a pixel INK attribute is set, the routine 
does not change it, and does not look at pixels adjacent 
to this one; otherwise, the routine sets the INK attribute 
to the current INK colour and moves to the next 
adjacent pixels. 

This method is known as the flood or grass-fire 
method, since, as you can see from its characteristic 
diamond shape, the INK spreads outwards until it 
reaches a “trench”, which stops it from spreading 
further, Any shape which is not completely enclosed, 
even if only by a single pixel, will “leak” when filled. 


Colouring irregular shapes 
Since the Spectrum can only have one INK and one 
PAPER colour in each character block, you may have 


FILL PROGRAM 





20: LET yazee 
ftxd,wa,x2,92) 


DORVVEPE RRR ERR 
60955060595689 506 


RANDOMIZE FN f 
RANDOM FN f 


ON FORK OUOVONRUME SWE 


ao 


PAUSE 100 
RANCOMTZE 


nn 


m (10,53 


@-2 


problems when there are more than two colours on the 
screen, and you call the routine to fill irregular shapes. 
If, for example, the shape has diagonal edges, you will 
see a jagged effect corresponding to character borders, 
instead of a straight line when the shape is filled. The 
diagram below shows how a combination of INK and 
PAPER colours can be used to overcome this problem. 





FILLING SHAPES AT CHARACTER BORDERS 
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ui ui. 
BOX FILL PROGRAM FN m 


FILL ROUTINE 


Start address 57700 Length 195 bytes 

Other routines called Line-draw routine (FNg). 

What it does Fills in an area bounded by a solid line of INK, in 
the current INK colour. 














Using the routine This routine fills in an area up to the edge 
of any shape enclosed by an INK line, or to the screen border. 
Remember that if there is even a single pixel of PAPER colour 
at the border, then the INK with which you are filling will leak 
out, and you may fill the entire screen. Notice also that a 
“wraparound” effect occurs when filling to left and right of the 
screen, which means that when the routine reaches the left- 
hand edge of the screen, it starts filling from the right-hand 
edge inwards, and the same will happen when the routine 
reaches the right-hand screen edge. 

If some of the attributes for character squares within the area 
to be filled differ from each other (as will happen, for example, if 
you change some of the attributes using the window ink routine) 
BOX FILL PROGRAM filled alternately. hen the area will be filled with these colours, rather than in a 


00: 05 Line 120 sets up a loop. single colour. 
F seconds Line 140 fills a box if variable = — 
x is exactly divisible by 10 | ROUTINE PARAMETERS 


the value of DEF FNm(x,y) 


xy pixel co-ordinates of the point at which to start filling 
2 (x<256, y<176) 




















How the program works 
Boxes are drawn in a loop, and — x by 5. 





























ROUTINE LISTING 








8009 LET _b=57700: LET 121906: LET 


o 
R i=zð TO l-1: READ a 
8902 POKE (bsi),a: LET z=z+a 
8903 NEXT i 


DI 
9 
9 

-ei 
m 
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N 
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INT (C270) -INT (z700 
3005 READ a: IF a¢>z THEN PRINT 
"92". STOP 
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8928 DATA 226,229, ź25,34,38 
8029 DATA 226,237,75,40,226 


S8930 DATA 167,237,66,200,195 
42 
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3 2237,83, 
8035 DATA 3226,52,175,147,216 
8033 DATA 95,157,31,55,31 
6034 DATA 167,31,171,250,245 
8035 DATA 171,103,122,7,7 
5036 DATA 7,171,250,199,171 
8037 DATA 7,7,111,122,230 
8038 DATA 7,71,4,62,254 
8039 DATA 15,16,253,6,255 
| 3040 DATA 163,71,126,160,192 
| 8841 DATA 126/176,119,42,46 
5042 DATA 225,257,91,42,226 
| 8043 DATA 115,35,114,35,229 
8044 DATA 1,76,229,167,237 
89045 DATA 66,.92,5,225,3 
8945 DATA 44,226,229, 225,34 
8847 DATA 40,526,201,153 5139: 
8048 DATA '57,0,0,0,0 
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FILLING SHAPES 2 





The fill routine really comes into its own when itis given SQUARES AND CIRCLES Line 120 sets a centre point 


highly irregular shapes to fill. Not only does it cope with PROGRAM for the display (x1,y1). 
these shapes with ease, it also fills them very quickly. 0:09 Line 130 starts a loop to 
The two programs on this page give an idea of the LILI LI 2 seconds draw the boxes and circles. 
Fa iliti i Line 140 draws a box based 
joutine's capabilities. | How the program works A on an increment from the 
The only complicated detail in each program is the | series of boxes and circles of centre point. 

calculation of the point from which the fill routine is to increasing size is drawn, and Line 150 draws a circle. 
start. Each program has to calculate this point on each the fill routine called inside Line 155 sets a test which 


pass of the loop. To ensure that whole numbers are areas at which the boxes and outine on alter- 


passed to the routine, the formula for the co-ordinates of circles intersect of the loop only. 


Tor j $ Lines 10-30 define the 0-190 fill four 
the point is placed in brackets and an INT statement pers corners of the display. 
placed in front of it. 
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The sguares and circles program fills in the inter- 
sections between a series of boxes and circles. The 
program is interesting for the different final displays 
which can be obtained by changing the values of a few 


parameters. caused by different shapes created each 
time the boxes and circles are drawn. The boxes and 
circles are drawn in a loop at lines 140-150, and the 
intersections filled at lines 160-190. 








SQUARES AND CIRCLES PROGRAM 


DEF FN 
DEF FN 


DEF EN 
BORDER 
CET > 


+49 1-INT 
ise RANDOMIZE EN 
721 20,259) 


§(%2,92,INT ti 
(C4 +8) 732) 
as 


Ti +8) ¢92=INT 


ae 


as 









The spiral program 

The spiral program is an effective use of the fill 
routine to colour in alternate portions of the circle. The 
two displays were achieved by varying n, which deter- 
mines the number of spirals to be drawn. 


SPIRAL PROGRAM the sequence repeated. The 


number of spirals is set by 


GO: 2B seconds variable n 
Lines 10-20 define the 
How the program works routines. 


Only the are and fill routines 
are used in this program. A 
circle is drawn and then two 
BASIC semicircles are drawn 
to join the centre point to the 
circumference. After two of 
these curves have been drawn, 
the space between is filled and 


Line 120 draws a complete 
circle (centre 128,88). 

Line 180 draws two curves in 
BASIC, using PI to specify 
semicircles. 

Line 190 fills the area 
between two curves on 
alternate passes of the loop. 





SPIRAL PROGRAM 


DEF FN 


© DEF FN mix, y) =USR 
BORDER PAPER 1 


TOs 


j1128,88,81,0, 
LET pd=24PIvn 
on 


(4045IN P) 





u 
AINT (BORC 
(604SIN (p-pd) 
PIPI 
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_OVERPRINTING AND ERASING 





The OVER command in BASIC is one of four “logical 
operators” on the Spectrum; its more formal title is 
Exclusive/Or, or XOR for short. XOR forms the basis 
of the machine-code routine, FNn, on this page. You 
will recognize at once the other logical operators, since 
they occur in Spectrum BASIC with the same titles: 
AND, OR and NOT. Logical operators give a result 
depending on the way particular bits are set. The table 
below shows how the four operators make decisions. 








TABLE OF LOGICAL OPERATORS 











AND | OR NOT XOR 
AB AANDE|A B AORB A NOTA|A B AXORB 
oo o loo o jo 1 loo o 
CoO THOT aa 2 
nO mao Malm ol ede al 
seal ji ET 1 JE 0 














Thus, the XOR-line routine (FNn) looks at the screen 
before setting a pixel. If the pixel is currently set, the 
routine clears it; if the pixel is not set, however, the 
routine sets it. 








XOR ELLIPSE PROGRAM 


19 DEF FN nix, 
23 BORDER S 


Go TO 110 


XOR ELLIPSE PROGRAM 


01:10 minutes 


How the program works 
Lines are drawn from a centre 


to points on an ellipse. 

Line 130 specifies how many 
lines are to be drawn. 

Lines 140-150 calculate the 
co-ordinates of a point on the 
circumference 









































INTERFERENCE CIRCLES PROGRAM 
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WAKE KE 











The interference circles program shows how, by 
using KOR lines, two overlapping circles can produce an 
interesting pattern instead of an area of solid colour. 








OVERPRINTING PROGRAM 


=USR s7600 
INK 2 


790600 
z noga 
Dorom 


DDOM Dhan 


ZZD* 


86 8990 5566 + 
ponz pom 

















FNn 
XOR-LINE ROUTINE 














Start address 57600 Length 20 bytes 

Other routines called Line-draw routine (FNg). 

What it does Draws an Exclusive/OR line on the screen 
between two specified points. 


Using the routine This routine works in the same way as the 
line-draw routine, except that Exclusive/OR allows you to erase 
what has been drawn. Using the routine you can draw lines over 
an image and then remove them again, without affecting the 


original image. As for the line-draw routine, the routine incor- 
porates some error-trapping. 


ROUTINE PARAMETERS 
DEF FN n(x,y.p.q) 






































xy specify the start pixel co-ordinates of the XOR-line 
(x<256,y<176) 
pia specify the end pixel co-ordinates of the KOR-line 
(p<256, a<176) 
L ROUTINE LISTING 
sese 57600: LET t=15: LET 


LET b= 
Z=@: RESTORE S060 
i=Øð TO l-1: READ a 
(b+i),a: LET z=z+a 
i 
8054 LET Z=INT (((z7t)-INT (z7t) 


vet 
8@55 READ a: IF a<>z THEN PRINT 
ers STOP 


80960 DATA 62,155,58,223,237 
8061 DATA 205,38,257,62,176 
6062 DATA 5O0,223,257,201,0 
8863 DATA 13,8,0,0,8 


SS eee 








OVERPRINTING DISPLAY 








Finally, the overprinting program gives an example of 
the XOR line routine being used to draw over some text 
and cover it (lines 160-170), and then “undraw”™ the 
lines by calling the routine again in lines 200 and 210, 
leaving the text intact. 





























COMBINING ROUTINES 





The programs on this page give some further examples 
of combining the routines used earlier in this book. You 
will see from the programs used here that, in a program 
of any length, it is a good idea to separate the machine- 
code routines clearly at the beginning of the program, as 
has been done here. 

Although the programs look complicated, they both 
consist mainly of machine-code calls. The repeated 
circles program is a symmetrical pattern; the small 
circles on the circumference of the large ones are drawn 
in lines 230-380. Variables x,y, which are points on the 
circumference of a large circle of radius rz, are used to 
determine the centre of the small circles. The actual 
centre points of the small circles are obtained by adding 


REPEATED CIRCLES 
PROGRAM 


Og: 18 seconds 


How the program works 
This program displays circles 
with smaller circles on their 
circumference. Each of the 


small circles is then half-filled. 


Line 100 defines ad, the step 
size. 


Line 120 defines x0 and y0. 
the offset from the centre for 
the four large circles, and rx 
and rz, the radius of the small 
and large circles. 

Lines 140-200 draw the large 
circles and the centre box. 
Lines 250-380 draw the small 
circles. 
Lines 400-440 set the colours 
of the four quarters of the 
screen. 





or subtracting an offset (x0,y0) from x and y in lines 
270-340. Variables xm,ym are used to calculate the co- 
ordinates for the fill routine. 

The kite program is even simpler; the only compli- 
cated part is the drawing of the tail (drawn by a sub- 
routine in lines 500-600). The number of bowsin the tail 
can be modified by changing the variable s in line 110. 





REPEATED CIRCLES PROGRAM 


bix, y, h, Y, Cb, fi =USR 
b, F) sUSR 


h, y? =USR_ 50400 
F? SUSR 599 


Expy how cy 


PAPER 1: INK 6: © 
FN 
FN 
FN 


FN 


J (82-K0,ua-40, 
JIKO, YA, 
KE OO Wa Ya KAY 


Jiki-No ulo, 
rz,0,255) 


scroll? 

































































REPEATED CIRCLES PROGRAM CONTD. 


159 RANDOMIZE KO ATE BETO 
KE WATA BAA 
(117,78 ,20,16 
(128,88) 


a) 


PN 


EN 
FPN 


PN 
FN Jiko ii, 


FN Xm+KO+L Um +E 


FN jix-xo,y+y0, rx 


a 
ZD PAD DN 
2z Z za 
6906 

H 

n 

n 


ouoo~ g: 
ue 27 


FN m(xm—xo.ym+yo) 
FN jix y, X, 9,255 


C Ob G N 
DD-d Ya 


~0- 000000 SANG 60 


FN mom, um) 


OH HH 
+h NN 


om mm 


a 


40 Go 6 g- 
vò 


MMD 
xz 


RANDOMIZE FN mt2,2) 
RANDOMIZE FN b19,0,16,11,2, 


RANDOMIZE FN b(28,11,16,41, 
RANDOMIZE FN c(3,0,16,11,5, 
@ RANDOMIZE FN <(16,11,16,11, 


42) 
Ó RANDOMIZE FN bi14,9,4,4,3,0 


aon S 
Ob p p po BOLL 
o 


=REUGREPOoM 


KITE PROGRAM 


OU: a 7 seconds 


How the program works 
The program draws a kite 
using coloured triangles, and 
then adds a tail with bows. 
Lines 120-130 draw the 
using triangles. 

Lines 150 and 180 sct yalues 
for the subroutine variables. 
Line 190 sets colours for the 
tail. 

Line 500 is the start of the tail 
subroutine. 

Lines 510 and 520 calculate 
the point x.y, at which an 
ellipse is drawn. 

Lines 530-560 draw and fill 
in each bow. 

Line $70 draws a line between 
each bow. 

Lines 580 and 590 set values 
for the next bow to be drawn. 


ite 











KITE PROGRAM 


10 DEF FN bix,9,h,¥, C, b, f) sUSR 
s2529 
20 DEF FN g (x,y,p.9) =USR 60700 
38 DEF FN i(£,4,P.a,r,s)sUSR S 
azae 
40 DEF FN n(x,y)=USR 5770 
200 BORDER 1. PAPER i: INK 2: © 


tS 
110 LET s=15: LET ad=s4PI/128 
LET azad464/5. LET lt=128: LET x 
1247: LET ya=127 

120 RANDOMIZE FN i (x1-40,y1,%1+ 
2283,52448) 

ANDOMIZE FN i (x2-40,y2,%1+ 
2,%2,52-50) 

ANDOMIZE FN mtx 2,y2) 

LET x22143; 
1:47: LET yi 

GO 3u5 500 

RANDOMIZE FN 

149 


x opa 
MPA 
OO TBS Os 

Goce 


n 


O RANDOMIZE 
RANDOMIZE EN 
RANDOMIZE FN b 


RANDOMIZE FN bizi 
RANDOMIZE FN b(5,16, 


PAUSE 9: STOP 
FOR i=@ TO Lt 
LET x=%2+iINT 
cer y 
RANDOMIZE 
y=3) 
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GRAPHICS EDITOR 1 








Perhaps the most effective way of using machine-code 
routines like those in this book is in a single program 
which enables you to use the routines together. 
Although by this stage in the book you have enough 
routines available to create the kind of sophisticated 
displays seen in much commercial software, you do not 
have what the professionals use: a complete graphics 
editor. This is the purpose of the following program. 


The graphics editor program 

Each stage of the editor program incorporates routines 
from this book, The final program includes a facility for 
SAVEing and LOADing individual screens. The 
displays accompanying the program on this page and on 
the following few pages will give you some idea of the 
sort of pictures you can produce using the completed 
program. 


How the program is built up 

The graphics editor is shown in five stages, with each 
stage complete in itself. By keying in the lines on this 
page, you will have enough of the program to be able to 
move two cursors on the screen. These are used for 
plotting points and drawing lines in future Soge, 











GRAPHICS EDITOR STAGE 1 


RANDOMIZE FN h (0,0,255,175) 


Der 012807 LET cr= 
IE cA tae THEN LET etecx: co 


167230 
„220 EF cx>235 THEN LET cr=255-ct 
“230 RANDOMIZE FN nicx-cl,cu,cx+ 


4) 
“246% Ler <t=20 
258 IF cGtae THEN LET et=cu: Go 


TO 270 
4200 EF c4>155 THEN LET cr=175-c 


“270 RANDOMIZE FN tex, cu-cl,cx, 


LET mus?! LET mus 


How stage one works 

Only two machine-code routines are used in stage one. 
The box-draw routine, FNh, draws a line round the edge 
of the drawing area, to prevent the fill routine (added 
later) from “wrapping around” the screen edge. 






































GRAPHICS EDITOR STAGE 1 CONTD. 


mu 
A (mx me muu, 


nh (mx+md,my-md, 


besoe 
Suna IGWHOAX 6 


“v 








mx =20 
1020 GO 
1100 LET 
1110 IF 
5 1100 
1120 LE 
11509 IF 
1130 Go 
1150 IF 
CET Je 
11609 GO 
1170 IF 
1160 Go 
1190 IF 
dae 
1200 Go 
1210 IF 
1220 GO 
1230 IF 
aza 
1240 Go 
1280 TF 
SCrOLL? 





Pps BRerER 
Or GUM MND 
ODAN 


The other routine included here is the XOR line 
routine, FNn, used to draw the two cursors. Exclusive, 
OR plotting is used because the cursors have to be able 
to move around the screen and remain visible, without 























disturbing whatever has already been drawn. Try 
moving one of the cursors in this program to a corner of 
the screen to see the XOR effect. The screen border 
remains unchanged when the cursor is moved away. 

Line 1000 is the beginning of the main routine. It 
gives initial values to all the variables used in the 
program. These, for example, store values for INK, 


CURSORS DISPLAY 



















PAPER, FLASH and BRIGHT. After setting initial co- 
ordinates for the two cursors (points cx,cy and mx,my), 
the program moves to the subroutines. These are stored 
early in the program to increase the running speed. 

The cursor subroutine is at lines 200-280, and the 
cursor is positioned at point cx,cy. The second cursor 
placed on the screen using the subroutine at lines 300- 
370 (points mx,my). These cursor subroutines (called 
cur, mar) are used to delete the cursors before any rou- 
tine is called, and again to put the cursors back on the 
screen afterwards. 


| GRAPHICS EDITORPARAMETERS | 
































| A attribute edit L line 
1 ink = 
P paper Q window paper 
o bright/flash = 
ENTER toquitatributeedit S save screen 
| oes ya 
B box T triangle (press T 
—_ ee again for second 
c corner of triangle) 
S san —_ 
E a w partial screen clear 
|a ioe x Text 
E widdow ENTER toquit text 
F fill 
G aad Al these instructions 
gn require you to press CAPS 
j EA SHIFT followed by the 


letter shown, in upper case. 

















GRAPHICS EDITOR 2 














The second stage of the graphics editor adds routines for 
points, lines and boxes, as well as adding the ink, paper 
and partial screen clear routines. 

Colour is set by the subroutines in lines 400-850. 
These allow you to select colour, BRIGHT and FLASH 


GRAPHICS EDITOR STAGE 2 CONTD, 





values. Points are drawn using the point-plot routine, in OO THEN g0 TO 2500 
lines 1320 to 1350. Some of the details in these lines n Ya EE AE Cea 
reappear throughout the program. Line 1320, for AORN yens 2 ngpa THES Cec 
example, checks to see if key D has been pressed (ASCII Eer Ane IA Oy RES Come 
code number 68). If it has, the two cursor subroutines 1529 66 To 1732, 

are called, and the values of cx and cy are used as the co- 1228 te boi Teen E 

ordinates of the point to be plotted. Lines 1360 to 1490 1358 


work in a similar way for the line draw, fill and box rou- 
tines. Line 1500 is a “dummy” line, where other 
routines will be inserted. | 


The grid subroutine 
Lines 1730 to 1790 set up a grid on the screen, by 
GRAPHICS EDITOR STAGE 2 











VCs bs fREUSR 


vi =USR 63000 
TO 1009 





182 


=INKEY$: IF 
N GO TO 418 


s 
a Ši 
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Cex re: 
NT (me 78> = 
IF xc>xm THEN LET 
IF yooyum THEN LET 


m 
840 LET h=ABS (xc-x@)+1: LET v= 
tgc-ym) +2 


THEN GO TO 1360 
SUB mar 
tex, eu? 


co To 1400 
SUB mar 


tmx pmy scx, cy) 


GO TO 1440 
SUB mar 
mcex,cu); LET 





























printing character squares in normal and BRIGHT | into memory by the subroutine at lines 6000 (called in 
alternately. When key G is pressed, a grid drawn bya | line 120). The grid is used to show character borders on 
machine-code routine appears. The routine is POKE the screen while you are drawing a display. 


GRAPHICS EDITOR STAGE 2 CONTD. GRAPHICS EDITOR STAG INTD. 











+247,216,17,0,68,1,6 
7®,88,1,128,2,237,17 
S$ -217,17,0,86,1,19 


55574 STEP 2 
POKE n+1,56 


RANDOMIZE FN cix ,ushowsc yb, 


GO TO 919 
THEN GO TO 2249 


M P N 


NZVIZVAVI DOO 


GO SUB mar 
atx, yh, v) 
9 TO 510 
ke<>6S THEN GO TO 1100 
Go sus 
6o GO SUB 400: Go SUB cur: GO 
mar 
70 RANDOMIZE FN bix,ushsvsc.b, 
To 


sea 
4,8 
5$ 
6,2 
sós 
2,2 
687) 
EOS 
Eog: 
510: 
Li 
2 


75 TO 55605 STEP 2 
: POKE n+1,120 


9999905: O90: 9 


FOR nzsssee T 


POKE nya | 
,0,88,1,192,2,17,55 








USING THE GRAPHICS EDITOR GRID 


The graphics editor grid (CAPS SHIFT and G) is used to display 
character borders by setting the BRIGHT attributes of alternate 
characters. The grid does not delete anything currently on the 
sereen. The cursor shows the current pixel position, superimposed 
on the grid, In the diagram, the cursor is on the leftmost pixel of a 
character square. 

















GRAPHICS EDITOR FILL DISPLAY 





























GRAPHICS EDITOR 3 








The third stage of the graphics editor adds routines for 
drawing circles and triangles. These routines give you 
many new possibilities for your displays, as you can see 
from those shown here. 


Drawing circles 

Line 1500 is the start of the circle routine. Lines 1510 to 
1530 enable the user to enter start and finish parameters 
between 0 to 360 degrees, rather than the machine 
code’s 0-255 parameter values. Lines 1570 and 1580 


contain some BASIC error-trapping to prevent a circle 
being drawn too far off the screen and causing the 
Spectrum to crash. These lines could be incorporated 
into any BASIC programs which call the circle routines. 


Adding triangles 

Lines 1610 to 1720 are used to store corner co-ordinates 
for a triangle before calling the triangle routine, FNi. 
The parameters of the three corner points are held as 
variables cx,cy, mx,my and tx,ty. 





GRAPHICS EDITOR STAGE 3 


DEF FN J(x.u-r.s. 
DEF FN 


f>=USR 569 
i (X,Y, P A;r 5) sUSR 6 


OR f<> INT 
S+ (537/360)? : 
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x-mx): LET ysAB 


© 
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mamo: 


(SOR (x42492) +0. 


HEN BEEP 2,3. INP 
cur: GO To ilo 
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N jimž, my, r,s, 6) 
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GRAPHICS EDITOR STAGE 3 CONTD. 
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Lines 1660 and 1670 take advantage of Spectrum 
BASIC’s facility for writing conditional stat i 
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The designs on this page show one method of producing 
a typical display. One general point is worth noting 
before beginning any large-scale graphics editor 
display. Each photograph of the cocktail display 
represents a point where the screen was SAVEd before 
going further to add more details. The reason for this is 
simple: even when you have a little experience with the 
editor, it is easy to ruin a display by adding an 
unintended line, or by filling a shape that is not totally 


GRAPHICS EDITOR 4 


ground. This effect can be obtained by changing the 
initial graphics editor screen to black INK and white 
PAPER colours. A simple change like this can be very 
effective. 


Building up a display 

The cocktail display shown here is an example of how a 
graphics editor display can be developed in stages. Stage 
one of the display uses only lines, squares and triangles. 





BLACK PAINTBOX DISPLAY 





COCKTAIL DISPLAY 1 | 





PAINTBOX DISPLAY 


COCKTAIL DISPLAY 2 = 


























enclosed. Rather than risk losing an entire display, itis | 
sensible to take a few seconds and SAVE what has been 
drawn before continuing. 


The paintbox displays | 
The paintbox displays above show the difference in effect 
which can be obtained by drawing in white ink on a black | 
background, rather than using black ink on a white back- 


Even at this early stage, however, the design has been 
planned so that there will be no problem with character 
borders when colour is added. The position of character 
borders can of course be checked by using the grid 
(CAPS SHIFT and G). The grid does not delete 
anything which has been drawn, so itis a simple matter 
to flick between the grid and the normal screen as 
necessary at this stage to ensure that lines and points are 
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drawn in the correct position on either side of a char- also drawn to ta ag acter borders when 
acter border. filled with colour. The colour change on the umbrella 

The second Ki lies along a horizontal and vertical character border, 

kample, the cherry in the glass although it appears from the display to be diagonal. 
relatively low resolution of th y- The picture was completed by filling areas and then 
a small circle such as that which forms the y adding colours. When drawing a complex display, it is 
not be completely enclosed. Four single points were always best to keep the filling and colouring operations 
plotted on this circle to prevent the INK from “leaking” until last. Remember that colours should not be 
when the shape is filled. The umbrella in stage three wa added while you are using the grid. 
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Text is added by lines 1800-1890 of the program. Line 
1810 takes the current pixel position (variables nd 
converts these to character co-ordinates. Thisis because 
text is printed in character positions rather than using 
pixel co-ordinates, Line 1820 deletes the cursors, and 
line 1830 prints a flashing text prompt at the character 





position. Text is then entered in lines 1840-1870, which 
include BASIC controls for deleting mistakes in keying, 
and ending the text string when ENTER is pressed. 


Attribute editing . 
Lines 1900-2030 give you the option of setting INK, 





BOXES DISPLAY 


PENCILS DISPLAY 


















































PAPER, BRIGHT and FLASH attributes of any f GRAPHICS EDITOR STAGE 5 CONTD, 
character square on the screen. As with text, the current 
pixel position is converted to character co-ordinates 


(held as variables lin, col) for this routine. Lines 1970 E FLASH 1;' 
and 1980 simply move the cursor (a flashing character i Bani” Go To sia 
square, printed in line 1960) onto the next line or 1 

column when the end of either is reached. SO SUB mar, 


(eni: LET 


Lin 


Saving and loading screens 

Finally, lines 2040-2130 of the program enable you to 
SAVE and LOAD your displays, using the Spectrum 
SCREEN$ command. An advantage of this method is 
that you should be able to load onto the graphics editor 
the title display of many commercial games, since these 
programs often begin with a SCREENS display. This SCrOLL? 
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will enable you to make your own versions of these 
screens. 
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co sus seo 
Go sus see 
Go sus asa 
Go To 230 


18S THEN Go TO 15009 : = Go” Sub mac 
te 8 LET y=21 SAVE pSSCREENS 


GO SUB mar khe<o74 THEN GO TO 2140 
OVER 1, FLASH INPUT “LOAD 


© S065 99056 


P$ 
ó SUB mar 
a$zINKEY$: IF LOAD psSCREENS > 

S<CHR$ 12 THEN GO TÖ 1 GO To 910 


HRS 13 THEN GO TO 18 


Rs 12 THEN PRINT CH 
S+CHRS 3;. LET a$ 
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MULTIPLE LINES 








When using the line-draw routine (FNg), you must 
specify both the start and the end points for each line 
drawn. Where only a few lines are involved, this is not 
difficult, but if you are drawing a complicated shape 
with many lines joined together, you will find yourself 
continually specifying each point twice: once as the end 
ofa line, and then again as the start of the next line. This 
can be avoided by using the multiple line-draw routine 
(FNo). This routine takes a series of co-ordinates which 
have been stored in memory, and joins each point in 
turn to the one before. 

Having drawn your complex series of lines so quickly, 
you now need a way of wiping them off without 
damaging the rest of the display. For this reason an 
Exclusive/OR version of the routine is also included 
(FNp). This routine is the same as the multiple line- 
draw routine, but plots XOR lines. The XOR routine 
will enable you to repeatedly draw and undraw a whole 
series of lines on the screen in a few seconds. 





Putting the points in memory 

Before using the routines, you must specify the co 
ordinates of the points to be linked, which are stored ina 
buffer. In operation, the routine takes a point from 


memory and joins it to the next point, and continues 
until it reaches a y co-ordinate of 255. Points can be 
POKEd into memory by using a loading routine such as 
the one below, which accepts pairs of co-ordinates: 
10 LET n 
20 INPUT 
30 POKE n, 
| 40LETn=n+2 
50 GOTO 20 
400 bytes from 57200 are reserved in memory for this 
purpose, so you can draw 199 lines with the routines. 
These routines are especially useful for plotting the 
same shape on the screen repeatedly, since points once 
stored in memory can be called by the routine almost 
instantaneously. 
















ellipse, The shape is then filled. 
Lines 140-330 POKE into 
memory the values of points 
around the edges of the screen. 
Lines 350 to 400 POKE into 
memory points on an ellipse. 
Lines 410 and 420 POKE 
values of 255 to complete the 
table of points, 


MULTILINE PROGRAM 


03:22 seconds 


How the program works An 
explosion effect is obtained by 
drawing a continuous line 
joining points on the edge of 
the screen with points on an 
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Be LET Latte 
50 NEXT i 

390 FOR i=@_TO 37 STEP s 

10 POKE i 

520 POKE LET tates 
330 NEXT 

340 LET 

350 FOR STEP 4 
360 LET ascos a) 
370 LET Q*SIN a) 
360 POKE E z+i+1,x 
390 LET, 

ago 

410 POK 

420 

130 
440 

450 

450 

470 
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The multiline program draws a long sequence of lines, 
which are then filled by the fill routine. Both routines 
must be in memory for the program to RUN. 





DISPLAY BEFORE FILLING 




















Start address 57000 Length 20 bytes 











Start address 57100 Length 40 bytes 

Other routines called Line-draw routine (FNg). 

What it does Draws a series of lines on the screen, from a 
specified list of co-ordinates. 





Using the routine Co-ordinates of lines to be plotted are 
stored in a table at memory location 57200. Up to 200 lines can 
be stored in this area of memory. Points in the table must be 
specified by the y co-ordinate (0<—y<—=175) followed by the 
x co-ordinate (o<—=x<=255), rather than the other way 


round. 

To stop the routine POKE specify a y co-ordinate of 255. The 
routine will continues plotting points until it reaches this y co- 
ordinate; if you omit the 255, the routine will continue to plot 
points using whatever numbers are in memory after the co- 
ordinate table. 








8100 LET b=S7100: LET 1235: LET 
Z=@: RESTORE 5110 
S8101 FOR _i=6 TO l-1: READ 3 
8102 POKE (b+id,a: LET z=z+a 
8103 NEXT i 
5104 LET Z=INT (((z/t) -INT (zr) 
* 
165 READ a: IF ac>z THEN PRINT 
“72: STOI 
8119 DATA 33,112,223,94,355 
8111 DATA 386,237,83,26,237 
8112 DATA 35,126,254 ,255,32 

| 8113 DATA 1,201,95,35,686 
8114 DATA 43,229,42,26,237 

| 8115 DATA 205,51,637,555) 24 
8116 DATA 223,0,0,2,0 

| 8127 DATA 17,6,0,6,6 








Other routines called Multiple line-draw routine (FNo). 
What it does Draws a series of Exclusive/OR lines on the 
screen, using points specified in a table. 


Using the routine This routine works in the same way as the 
multiple line-draw routine, but can be called twice with the same 
table of co-ordinates to erase the lines drawn. Remember as 
before to POKE points in the order y,x. Co-ordinates are stored 
in memory from location 57200, and the final point must be 
followed by a y co-ordinate of 255. 
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b=S7@0@- LET t=15: LET 
RESTORE 8160 

FOR 1-6 TO 1-1 
E (b+i),ā 


READ a 
LET z=zea 





NEXT i 

LET z=INT (€C(z/t)-INT (z700 
READ a 
STOP 


1O- OO MON w 
USONI 


IF az THEN PRINT 


DATA 62,166,50,223,237 
DATA 205,12,223,62,176 
5@,253/237,201,0 | 
DATA 13/0,.0,0,0 
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MAGNIFICATION AND REDUCTION 1 





One of the most dramatic uses for machine code is to 
magnify a portion of the Spectrum screen. The principle 
behind magnification is straightforward. To double the 
size of a single byte, for example 00110010 (a value of 
50 in decimal), simply rotate it left one bit, thus making 
01100100 (which is equivalent to 100 in decimal) 
Using this principle of doubling, you can magnify whole 
sections of a screen. The magnification routine, FNq, 
given here, is based on this idea. The routine simply 
requires you to specify the screen area to be enlarged. 
The magnification routine is accompanied by a 
reduction routine, FNr, which is used to reduce an 
already-magnified area. The reduction routine actually 
forms part of the magnification routine, with the start 
address of the second routine being a call which “hooks” 
into the main routine, The reduction routine restores 
the screen as it was before the magnification, and works 
by the magnification routine saving the entire screen 
each time it is called before magnifying any area; the 
reduction routine simply displays this area from 
memory on the screen. Each time the magnification 

















Remember that the magnification program calls the 
multiline routine, FNo, to draw the background 
pattern; this routine must also be present in memory for 
the program to RUN correctly. 


MAGNIFICATION PROGRAM 
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routine is called, therefore, any former stage of magnifi- 
cation is deleted from memory, so the reduction routine 
can only be used to reduce a magnified area once. 


The magnification program 

This program uses the magnification routine to 
repeatedly enlarge a part of the screen. By adding the 
following lines: 


30 DEF FNr()=USR 56957 
280 RANDOMIZE ENr() 
you can incorporate the reduction routine into the 


program. This will have the effect of reducing the 
enlarged area to its last state. 




















MAGNIFICATION 
PROGRAM 


GODS seconds 


(to magnify area) 







How the program works 
Lines 110-220 use the 
multiline routine to draw a 
series of lines. 

Lines 130-200 POKE co 
ordinates of the lines to be 
drawn. 

Line 230 waits for text to be 
entered. 

Lines 240-270 magnify the 
area with text five times. 
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MAGNIFICATION ROUTINE 








LISTING FOR BOTH ROUTINES 











Start address 56700 Length 290 bytes 
What it does Magnifies a specified screen area to double its 
previous size. 


Using routine The routine uses character co-ordinates, 
as in the window ink and paper routines (FNb and FNc), rather 
than pixel co-ordinates. Remember that these start from the 
top left-hand corner of the screen. The routine can be used to 
magnify the same area repeatedly, increasing the enlarge- 
ment each time. 

Since an area is doubled in size by the routine it is easy when 
magnifying to make part of the area disappear off the screen. 
To prevent crashes occurring, use the tests in the parameter 
table to make sure that the area when enlarged will not be off 
the screen. These tests can be incorporated into your 
programs. 





ROUTINE PARAMETERS 
DEF FN q(x,y,h.v) 
specify top left-hand corner of area to be magnified 


xy 
se [&<32, y<22) SI 























hy specify horizontal and vertical sizes of area 
(x+(2#h) <32,y+(2*v) <22) 























8200 LET_b=56700: LET t=28S; LET 
=@: RESTORE 8210 
FOR 1-8 TO 1-1. READ a 
6202 POKE (b+i),a: LET z=z+a 


NEXT i 

8204 LET Z=INT (Z7 -INT tz7/0 
6205 READ a- IF a:>òZz THEN PRINT 
"97": STOP 


b 








=> UPN 


w aA 
8 


~PONENN NED 
ON. HMGS- 
OMOMM: = H 


NOSSO: ~ ND- 
AAGPOSA HON ~ UKUU 


AR BSS > p 
N NH O OO NOG 
Bo 0 Oo OF 


+++ OO NODON JEE MONOD 
N 
N 


BEOS ps > U> 


NAA AUNA PN- BOOP N: » NAAPI- Me 


DAANNANA USIA PUN O Geean VUY 
~ ON: Gs ONAP ~> Ns OS 


SRR YU MHO W» ~~ BRO. W 


Ie Wes MERWE <= OR 


oo e 
va 


~ 


gi 

19 

NI 

fi) 

Qı 

2 

Es 

F 
DVUPMKANON VORRRONFON KUNUIA 
eee GUNMEN NEN FUNYOAN W 0 WANOA- - N 


< N> AMUN: 1 


Be Wess DS pe 
as Ben oie 


NAW ON SANAA N- AU MERE BOW NASI De. BRM. > 
Ssp BD Ho 


wobe Oe DO Ne ~~ 
O OSNON eNe UPN ON P 


o! 
NI 
(I 
Hi 
Q! 
2 
4 
D 
h 
0 
iF 
ya 
DI 
~ TNPOVDLOR M> P~ MENAS 
< OOUNPUN H- Me- M NAA Oe UUWONMN VUNGA UWAN Va. VUND & 


yan 


a 
N 
A 
N 
9 
D 
4 
D 
MERTI 
UPESI MOU AP 
an 


GANINMGN. O NO OO. VUE VIA OQUP POMNO Oo. H 
o 


+P ONO ON- ON. DNs N 


~ Oo aw 
BN 

è 

p 


e 


<~ De GNN VE MUA UPANA ON ONNA ON OUN 
8 
a 


Sh. JUS NO NOS Ns No 
PON NUON Ay 


~ OQ. GHOPMN ~ 0 ~ D> =~ MD 
MENOS BY. ~ 


ONG +a 


O- 090 00 NN OR. H> ~~ 
rer e 











REDUCTION ROUTINE 








Start address 56957 Length 290 bytes 
What it does Reduces a previously enlarged routine to its 
original size. 


Using the routine Each time the magnification routine is 
called, it saves in memory the screen as it was before magnifi- 
cation. The reduction routine simply displays this saved screen, 
Thus the reduction routine cannot repeatedly reduce an area on 
the screen; it will only show whatever was on the screen before 
the last magnification. 








MAGNIFICATION AND REDUCTION 2 








The program on this page gives an indication of the 
capabilities of the magnification routine. From an 
initial display, the magnification routine is called three 
times to enlarge different areas of the screen. As a 
further sophistication, these enlarged areas are then 
coloured using the window paper routine, and a line is 
drawn around the edge of each area. 

The various shapes are drawn by different sub- 
routines at lines 300, 400, 500 and 600, and each shape 
is drawn higher up a column by increasing the y co- 
ordinate before calling the subroutine. After a single 
column has been completed with five shapes, the display 
is repeated by the loop beginning at line 110 which setsa 
new value for the x co-ordinate. 

After the subroutines have been completed, line 700 
uses the magnification routine for the first time. Each 
time an area is magnified, the box routine is then called 
to draw a black line around the edge of the enlarged 


SWEETS PROGRAM 
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area (in this case, line 710). After a pause, the new area 
is coloured, and another area is enlarged. 


Relocating areas in memory 

The magnification routine works by storing in memory 
whatever is on the screen in the specified area. It uses 8K 
of memory, stored from location 30208. If your BASIC 
program is particularly long, you may find that this area 
is required by your program. By POKEing the following 
three numbers: 

POKE 56793,176 

POKE 56950,176 

POKE 56959,176 


you can place the code about 18K higher in memory. 
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SWEETS PROGRAM CONTD. 
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SWEETS PROGRAM CONTD. 
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SWEETS PROGRAM 


DU: 13 seconds 


How the program works 
A scries of objects is placed on 
the screen, and the 
magnification routine used to 
enlarge various parts of the 
display 

Lines 130-220 call 
subroutines to draw the 
pattern of sweets, 

Lines 300-670 form the 
subroutines which draw the 
sweets. 

Lines 700-710 magnity the 
top left-hand area (coloured 
green in line 730). 

Lines 750-770 magnify the 
top right-hand area (to four 
times its normal size), 

Line 790 colours this area 
cyan. 

Lines 810-820 magnify the 
third area, 

Line 840 colours this area 
magenta. 
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The BASIC commands SAVE SCREENS and LOAD 
SCREENS, used to save and load displays, have the dis- 
advantage that they require nearly 8K of memory to 
save any display, no matter how simple. The screen 
compaction routine, FNs, allows you to store screens in 
a fraction of this space: the simpler the display, the less 
memory is required by the routine to store it. Even 
highly complex screen displays are stored in 
considerably less than 8K. As a guide, the three displays 
on this page require a total of just under 12K. 
Previously saved displays can be displayed again 





COMPACTION 
PROGRAM 


(30000) where the first display 
is to be stored 
Line 120 PRINTS this 


” address. 
o0 D3 seconde Line 140 compacts the 
How the program works display. 


Line 150 PEEKs start values 
for the next display. 

Lines 160-200 repeat the 
operation for the other screens. 
Lines 300-350 display the 


screens in turn. 


Three screens are loaded using 
SCREENS, compacted, and 
then displayed again in quick 
succession. 

Line 110 sets values for high 
and low bytes of the address 

























































































using the decompaction routine, FNt. For both 
routines, the memory location of a display is specified by 
two parameters, containing the high and low bytes 
respectively of the start address. 


COMPACTION - DECOMPACTION PROGRAM 
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FNs 
SCREEN COMPACTION ROUTINE 








FNt 
SCREEN DECOMPACTION ROUTINE 














Start address 56600 Length 65 bytes 
What it does Saves the current screen in a compacted form in 
memory. 


Using the routine Parameters h and | are calculated by the 
formula oo 

10 LET h=INT (store/256) : LET l=store—256*h 

where “store” is the address in memory at which the screen is 
to be stored. 

After storing a screen, you can find the start address for the 
next_screen to be stored by PEEKing locations 23297 and 
23296 (for h and |, the high and low bytes respectively of the 
address). This should be done immediately after compacting a 
display. 








Start address 56500 Length 45 bytes 
What it does Decompacts a screen previously stored at a 
specified address. 


Using the routine This routine puts back onto the screen a 
routine previously stored by the compaction routine. The 
decompaction routine loads screens much more quickly than 
the LOAD SCREEN$ command. 

To obtain the start addresses (h and |) of each screen com- 
pacted by the compaction routine (FNs), PEEK locations 23297 
and 23296 (for h and |) after compacting a screen. 


ROUTINE PARAMETERS 
DEF FN t(h,I) 














ROUTINE PARAMETERS 








DEF FN s(h,l) 








specify the high and low bytes of the data for the 
screen respectively (h,|<255) 


[m] 











ROUTINE LISTING 
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hl specify the high and low bytes of the data for the 
is screen respectively (h,|<255) 














ROUTINE LISTING 











S@ LET _b=S65@@: LET U=35: LET 
@: RESTORE 8360 

S1 FOR i=@ TO l-1: READ a 

S2 POKE (b4i),a. LET z=z+a 

53 NEXT i 

54 LET z=INT ti t -INT (z740) 
l 

SS READ a: IF acs)z THEN PRINT 

















COMPACTION PROGRAM: SAMPLE DISPLAY 

















The displays on this page were produced using the 
graphics editor, stored by the compaction program and 
then displayed in succession. The start addresses in 
memory (variables h,l) of any screens you draw will 
obviously differ from those given here. 





























































































































The table shown below gives a summary of all the | programs. If you have not used a routine before, you are 
machine-code routines used in this book. Thistabledoes | recommended to read the introduction to the routine on 
not explain every detail of using each routine; it is | the appropriate page of the book before usingitin your 
intended only as an aid when using the the routines in your program. 
ll partial screen clear FNa(x,y,h,v) x,y startco-ordinates character 
hv horiz. + vert. increment character 
ll window ink FNb<«,y,h,v,c,b,f) X,Y start co-ordinates character 
h,v horiz. + vert. increment character 
c colour ki 
bf | BRIGHT or FLASH = 
13 window paper FN¢e(x,y,h,v,c,b,f) XY start co-ordinates character 
h,v horiz. + vert. increment character 
c colour -- 
en ae a bf BRIGHT or FLASH — 
15 enlarged horizontal text FNad(x,y) XY i — character 
15 ale ertical text __FNe(x,y) XY character 
17 point-plot FNf(x,y) x,y start co-ordinates pixel 
21 line-draw FNg(x,y,p,q) x,y  startco-ordinates pixel 
Pq end point co-ordinates 
25” box-draw FNh(x,y,h,v) x,y start co-ordinates 
r hv horiz. + vert. increment L 
27 triangle FNi(x,y,p,ar,s) x,y start co-ordinates 
p,q co-ordinates of second point 
> ns co-ordinates of third point 
29 squares table =. = La 
29 GE ee g 
31 arc FNj(x,y,1,5,f) x.y start co-ordinates pixel 
f length of radius pixel 
sf start and finish point ofarc =- _ FN 
33 sector FNK(x,y,1,s,f) x,y  startco-ordinates pixel 
r length of radius pixel 
sf start and finish point of arc — 
33 segment FNI(,y,1,s,f) x,y start co-ordinates pixel 
r length of radius pixel 
s,f start and finish point of arc — 
35 fill FNm(,y) x,y  startco-ordinates character = 
39 XOR-line FNn(x,y,p,q) Xy start co-ordinates pixel 
p,q co-ordinates of second point pixel l 
53 multiple line-draw NO 
53 multiple XOR-line draw FNpQ “ee | 
55 magnification FNa(x,y,h,v) xy start co-ordinates character 
h,v horiz. + vert. increment character 
55 reduction FNrQ) 
59 compaction ENs(h,l) hl high and low bytes — 
59 decompaction FNt(h,l) hl high and low bytes = 














REG ie) a OA 


Before using a routine you must first define it in your 
program using DEF FN followed by the correct number 
of parameters. Parameters passed to machine-code 
routines must always be whole numbers; if a parameter 
value is calculated by your program, then put an INT 
statement in front of it to ensure a whole-number value 
is passed to the routine. 













































































ranges bytes address check 
0-32 and 0-24 100 63000 82 
0-32 and 0-24 
0-32 and 0-24 135 62800 53 
0-32 and 0-24 
f 0-7 
0=off, 1=on 
| 0-32 and 0-24 150 62600 19 
0-32 and 0-24 
i 0-7 
| 0=off, 1—0n 
B 0-32and0-24 220 62200 0 
0-32 and 0-24 215 61900 2s 
= O-255and0-176 65 61500 24 
| 0-255 and 0-176 215 60700 192 
0-255 and 0-176 
0-255and0-176 110 60400 86 
0-255 and 0-176 É 
0-255 and 0-176 80 60300 68 
0-256and 1-176 
0-256 and 1-176 
60 59600 3 
Í ; 525 59000 234 
i 0-255 and 0-176 45 58900 17 
0-255 
0-255 i 
0-255 and 0-176 45 58800 35 
0-255 
| 0-255 
0-255 and 0-176 30 58700 18 
0-255 
0-255 
0-32 and 0-24 195 57700 57 
0-255 and 0-176 20 57600 13 
0-256 and 1-176 
40 57100 17 
20 57000 13 
0-32 and 0-24 290 56700 38 
0-32. and 0-24 
56957 
0-255 65 56600 56 
0-255 40 56500 28 



























































MEMORY MAP 
This chart shows how the Spectrum memory is organised when all 
the routines are present in memory. RAMTOP should be set to 
55500 using a CLEAR command. 

Code Title Address 
FNa partial screen clear 63000 
FNb window ink 62800 
FNc window paper 62600 

100-byte buffer 62500 

FNd enlarged horizontal text 62200 

[Se eee 

FNe enlarged vertical text 61900 
300-byte buffer 61600 

FNf point plot 61500 
FNg line draw 60700 
FNh box draw sy 60400 
FNi triangle draw 60300 
600-byte buffer 59700 

squares table 59600 

master curve 59000 

FNj are 58900 
FNk sector 58800 
FNI section 58700 
FNm| fill 57700 
FNn exclusive /ORine draw 57600 
400-byte buffer 57200 

FNo multiple line draw 57100 
FNp multiple XORJine draw | 57000 
FNq magnification 56700 
FNr reduction 56957 
FNs compaction 56600 
FNt decompaction 56500 
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ERROR TRAPPING 








Error trapping in BASIC is carried out when an error 
message is displayed to show a mistake has occurred. 
This message is produced by a routine in the Spectrum 
ROM which prints on the screen the nature of the error. 
When using machine code, however, it is often 
difficult to place restrictions on the way the routines are 
used, In most cases a determined user will be able to 
make the routine crash simply by passing it information 
which it does not understand. This could be checked 
within the machine-code routine itself to ensure that 
whatever is inputted is within the possible ranges you 
can type in, but to do this for all the routines in this book 
would require each routine to be perhaps doubled in 
length to incorporate the error checking required. 








Preventing likely errors 
In some cases it is quite easy, as well as helpful for the 
user, to add at least some error checking. A check 
routine has been added to the point-plot routine, for 
example, which means that although you may get 
rather unexpected results when you plot off-screen 
points, the routine is unlikely to crash. Try plotting a 
point which is off the screen and you will see the effects 
a point will appear, but since the point specified is off 
the screen the routine will try to make sense of the data 
and plot a point at a position on the screen. 





Error-trapping with the line-draw 
routine 
Another part of the machine code which contains 
some error checking is the line-draw routine, as you can 
see from the error demonstration program shown here. 
Specifying lines off the top or bottom of the screen will 
result in “Integer out of range” being displayed, as 
happens when the program below is RUN with the co 
ERROR DEMONSTRATION PROGRAM 





Paty) 
138 NEXT j 














PLOTTING OFF THE SCREEN VERTICALLY 





ordinates shown. Errors in horizontal co-ordinates are 
more difficult to trap, since these co-ordinates lie 
between 0 and 255, the range of numbers that can be 
contained in one byte. If you use a number larger than 
t is likely to be treated as if it were 255 less than its 
actual value, with the result that the line wraps round to 
the other side of the screen. This effect can be seen in the 
screen below, the result of specifying parameter values 
which are off the screen horizontally. 

PLOTTING OFF THE SCREEN HORIZ! ALLY 




















A similar effect can be seen with the curve routines, 
which cause odd effects when they go off the sides of the 
screen, but which will work within limits off the top and 
bottom of the screen. 

The error trapping in these routines covers only the 
most likely errors you may make when using the 
machine code. As far as possible, you should keep to the 
limits and parameters specified for each routine. 








GRAPHICS GRIDS 

















































































































































































































This grid shows screen divisions for both pixel and hand corner of the screen across and down, Pixel co- 
character co-ordinates. Points on the screen are defined ordinates are measured from the bottom left-hand 
by co-ordinates x (horizontal) and y (vertical). corner across and upwards. Pixel co-ordinates do not 
Character co-ordinates are measured from the top left- cover the bottom two lines of the screen. 
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Main entries are given in 
bold type 


AND 38 

Arc pattern program 30 
Arcroutine 30-1 
Attribute editing 50-1 


Background colour 12 
BASIC 6-7,9 

Billiard ball display 47 
Box-draw routine 25 
Box fill program 35 
Boxes 24-5 

BRIGHT 10,12 


Characters 
co-ordinates 63 
enlarging 14-15 
Circles 
graphics editor 46 
master curves 
routine 28-9 
ways of drawing 28 
Cityscape program 
18-19 
CLEAR 8 
Cocktail displays 
Colour 10-13 
background 12 
changing 10 
irregular shapes 34 
partial screen clear 
routine 10-11 
window ink 
routine 10-11 
Compaction 
program 58-9 
Cones program 31 
Cosine curves 
program 16 
Cube program 20 
Cursor subroutines 


48-9 


43 


DRAW 20 


Enlarged horizontal text 
routine 14-15 
Enlarged vertical text 
routine 14-15 
Erasing 38-9 

Error trapping 62 
Exponent curves 


program 17 


Fill routine 34-5 
FLASH 10, 12 
[Functions 9 


(Graphics editor 7, 
42-51 

attribute editing 50-1 
cocktail displays 48-9 
cursor subroutines 43 
drawing circles 46 
grid subroutine 44-5 
loading 51 

paintbox displays 48-9 
parameters 43 
program 42 

saving 51 
triangles 
Grids 63 
character 
co-ordinates 63 
pixel co-ordinates 
graphics editor 
subroutine 44-5 


46-7 


63 


INK 10 
Interference circles 
program 39 


Kite program 41 


Line-draw routine 
20-3, 52 
error trapping 62 
Line graphics 20-3 
Line interference 
program 23 
Line pattern 
program 22 
Loading 
displays 51, 58-9 
machine code 8,9 


Machine code 6-9 
boxes 8 
disadvantages 6 
error trapping 62 
loading 8,9 
saving 8-9 
using 8-9 








Machine code 
routines 6-9 


checklist 60-1 
Magnification program 
54-5 

Magnification 
routine 54-5 
Master curve routines 
29 

Memory 

clearing 8 
map 61 
Mondrian painting 
program 12-13 
Multiline program 
Multiple line-draw 
routine 52-3 
Multiple XOR-line 
routine 52-3 


52-3 


NOT 38 


OR 38 

OVER 38 
overprinting 38-9 
Paintbox displays 48-9 
PAPER 12 

Partial screen clear 
routine 11 
Perspective boxes 
program 25 
Pictures 
with lines 
with points 
Pixel co-ordinates 
Planet program 17 
PLOT 16 
Point-plot program 
flowchart 7 
Points 
pictures with 
storing 52 
Pyramid program 22 


20-3 
16-19 
63 


16-18 


Radiating box 

program 25 
RANDOMIZE 9, 16 
Reduction routine 54-5 
Repeated circles 

program 40-1 
Repeated triangles 

program 26 
RESTORE 9, 12 


Saving 
displays 51, 58-9 | 
routines 8-9 








| Sweets program 57-8 


Screen compaction 
routine 58-9 
Screen decompaction 
routine 58-9 
SCREENS 51, 58-9 
Sector program 32 
Sector routines 32-3 
Segment program 33 
Segment routine 32-3 
Shapes, filling 34-7 
Space station display 47 
Spiral program 37 
Spotlight program 27 
Squares, drawing circles 
using 28 

Squares and circles 
program 36-7 
Sunset program 20-1 


Text, enlarging 14-15 
Triangle curves program 
27 
Triangle draw routine 
26-7 
Triangles, graphics 
editor 46-7 
Window ink routine 11 
Window paper 
routine 13 


XOR ellipse program 38 
XOR-line routine 38-9 
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The bestselling teach-yourself programming course now takes you 
beyond BASIC to the world of advanced machine-code graphics. 


Patel ar collection of tailor-made, ready-to-run machine-code routines, this 
| eer ject os book shows you how to produce precision, high-resolution graphics 
1 ina fraction ofthe time they would take in BASIC alone. A keyboard- 
| driven graphics editor and a wide variety of demonstration 
programs will Hele you open up the full potential of the ZX Spectrum 
—without the need for any knowledge of machine-code 


| 
| 
| 
Using a combination of simple BASIC programming and a ] i 
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Together, Books Three and Four in this series form a complete, 
self-contained graphics system for Spectrum-owners. 


Allthe programs in this book run on both 48K ZX 
Spectrum and ZX Spectrum+ machines. 


C6 Far better than anything else reviewed on these pages... 
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im better than most 99 | | 
He] COMPUTING TODAY ie 


66 Excellent... As a series they could form the best ‘basic = 
| introduction’ to programming I’ve seen 99 
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